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SPECIALLY TARGETED. Works in harmony with your 
z-card/cpm equipped Apple IL No more floppy shuffle. 
Fast one pass compiler that doesn’t generate 
unnecessary intermediate files which require further 
assembly. 

PROFESSIONALLY DESIGNER Crafted by a project 
team with over 15 years of Pascal programming 
experience. A powerful Pascal that includes all thè 
features necessary for professional program 
development including random files and dynamic 
strings. 

INCREDIBLE SPEED. Resultant stand alone programs 
execute 10-20 times faster than thè equivalent Basic or 
up to 4-1/2 times faster than U.C.S.D. programs. 

TRADEMARK 

CPM Digital Research 

Apple Apple Computers 

UCSD University Calif. San Diego 

Alcor Pascal Alcor Systems 


POWERFUL TEXT EDITOR. Has Macro capability, 
reconfigurable and understands smart terminals. 

EXCEPTIONAL DOCUMENTATION. Includes 250 page 
documentation pkg. that guides you step by step. 

OPTIONAL ADVANCED DEVELOPMENT PKG. Includes 
Optimizer and Native Code Generator for even faster 
executing programs. ADP: $125 + shipping. 

ALCOR PASCAL: A new standard of excellence from 
thè professionals at Alcor Systems. 


CALL OR WRITE for a free 20 page technical brochure 
with all thè facts. 214-226-4476. Pascal System: $199 + 
shipping. .— 



Alcor Systems 
800 W. Garland Ave. 
Garland, Texas 75040 


Dealer Inquiries Invited 
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• Dual Hi-Res Graphics • Printer 
Selector Dip Switch • Apple Ili 
Compattale* «Graphics Screen 
Dump • Inverse Graphics 

• Emphasized Graphics • Doublé Size 
Picture • 90° Rotation • Center 
Graphics • Chart Recorder 

Mode • Block Graphics • Bell 
Control • Skip-over-perf • Left and 
Right Margins • Variable Line 
Length • Text Screen Dumps. 

The Grappler + also works with 
Pascal and CPM. 

The Grappler + Interfacce wlth 
thè followlng prlnters: 

• Anadex • Centronics • Datasouth 

• Epson** • NEC • C.ltoh • Okidata** 

The originai Grappler is available for 
IDS 460,560, Prism, Microprism. 

W 


jJOrange infero 


1400 N. Lakeview 
Anaheim, CA 92807 
U.S.A. 


Now, thè Grappler +. 

The originai Grappler was thè 
first graphics interface to give 
you hi-res screen dumps from 
your keyboard. The new 
Grappler + with Dual Hi-Res 
Graphics adds flexibility with a 
side-by-sìde printout of page 1 
and page 2 graphics. 

Interfacing thè Grappler + to a 
wide range of printers is easy 
as changing a dip switch. 4K of 
exclusive firmware makes thè 
Grappler + thè most intelligent, 
full-featured Apple® Printer 
Interface made. And, thè 
Grappler + is Apple III compatible* 

Up to 64K Buffer Optlon 

An optional Bufferboard can now 
be added to all existing Grappler 
and Grappler + interfaces. See 
your Apple Dealer for details. 

•Requlres additional software driver. 

'*Requlres graphics upgrade. 


ACTUAL APPLE II PRINTOUT USING GRAPPLER AND EPSON MX100 

With The 

Grappler+ 

Printer Interface 


CPM is a registered trademark of Digital Research, Ine. 
Apple is a registered trademark of Apple Computer, Ine. 
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ledger, vendor activity, customer activity and 
employee activity. Aging with receivables. Visual 
documentation. Toll-free hot line for technical 
support. And a reasonable price. 

No matter what your accounting needs are— 
from personal to business—thè Dakin 5 Business 
Bookkeeping System™ solves thè problems. (So 
does our Budget Planner,™ Depreciation Planner,'’ 
Analyzer,™ and Programming Aids.™ Butmoreon 
that and other versatile new tricks later.) 

Dakin 5- We give it all to vou. Faster, easier and 
for less. Honestly. 

Just ask your locai computer retailer. 

Dakin 5. Answers tliat put an end to thè 
disappearing dollar. 


The Dakin 5 Business Bookkeeping System.™ 
We do more, faster—yet cost less than any 
comparable program! 

That, our competitors may feel, was a cheap 
trick. Notso. It took no magic at all 

to make us shine. We 
s ieo» „ usedourheads 

flS s —and 8 ave our 

gvcvess customers what 

&<■ s-es °° o they asked 

<*■*£&* for AQuick, 

&& K \6 easy-to-use 

v- 00 system that 

, t g&P 0 o encompasses 

V v es generai 


□ Please send informatico on thè Business Bookkeeping System 

□ Also enclose informatici! on other Dakin 5 business software. 

Name_ 

Address- 

Citv_State_ 7 _Zip_ 


$ 395-00 


DAKIN 5 CORPORATION 

7000 Broadway, Suite 304, Denver. CO 80221 ( 303)426-6090. 
Tbìi fréè Hot UneTsOO-i25"o463 _ 
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Hot Cider 


Remarks from thè Publisher... 

Wayne Green 


The publisher of inCider, Wayne 
Green , spent a number of weeks re - 
cently in thè Orient, investigating thè 
status of microcomputing in that part 
of thè world. While on his way, he 
transmitted this editorial to thè 
magazine. 


One of thè reasons there are so 
many con men in thè world is be- 
cause so many people go bananas 
when they think they can beat thè 
System and save a few bucks. Well, 
my friends, there are a whole bunch 
of wily Chinese gents just rubbing 
their hands together in contempla- 
tion of thè almost inexhaustible sup- 
ply of suckers in thè U.S. who are 
willing to send money to Taiwan for 
a discount Apple. 

After having personally looked at 
about thirty of thè over one hundred 
rip-offs of thè Apple being made in 
Taiwan, and after having talked 
with quite a few of thè chaps who 
make these Chinese copies, I have 
some advice for you. If you send for 
one of these things you are not just a 
sucker, you re crazy. 

Taiwan, which is accepted as a 
country by thè U.S. and thè island of 
Nauru and not much else, has a gov- 
ernment that ignores copyrights and 
trade marks. You can buy locally 
printed copies of most of thè com¬ 
puter books for a couple of bucks 
each. Software? Copies of VisiCalc 
are going for under $10. Cartier 
watches? You can get a nice Chinese 
copy of a $14,000 watch for about 
$30. . . and I defy you to teli thè dif- 
ference. It’s legai on Taiwan! And so 
is making copies of thè Apple and ex- 
porting them. The rub Comes when 



U.S. customs spots them arriving 
. . . and confiscates them. 

One would think that a prudent 
manufacturer would at least change 
thè box and make it a little more dif- 
ficult to detect thè Apples arriving at 
U.S. shores, but, on thè contrary, 
many of these chaps have gone to thè 
trouble of imitating thè Apple logo 
and copying thè Apple instruction 
manuals. I saw little effort made to 
vary in any way from thè Apple de¬ 
sign. Of course, a look inside is some- 
thing else. Most of them are very 
poorly made, with many of thè 
plated-through holes not plated 
through. And I gather there is a 
widespread use of surplus memory 
chips from thè game manufacturers. 
Several sources said only about 70% 
of thè computers work when you get 
them. . . lending stili a further Rus- 
sian Roulette aspect to their pur- 
chase. The reliability for most of 
them is poor, as you would expect. In 
all, it is not a great gamble. 

When you remember Taiwan is a 
third world country that, despite re- 
cently developed manufacturing in- 


dustry, has virtually no electronic en- 
gineers or technicians, perhaps you 
can understand why they are able to 
copy American and Japanese prod- 
ucts, but are at a loss to make even 
thè simplest of changes. Taiwan has 
had a government policy for years of 
discouraging youngsters from elec¬ 
tronic hobbies. The island is, in many 
ways, a dictatorship, with personal 
freedoms elusive. Im sure that most 
of you have read about thè murder of 
thè dissident who returned from a 
visit to America. Chinese students in 
America have been complaining of 
thè Chinese secret police keeping 
dose tabs on them here. Well, at 
home they are not permitted to own 
short wave radios, so thè usuai teen- 
age opening to electronics via 
amateur radio is not possible. 

No country that does not offer 
electronic hobbies for its teenagers is 
able to generate much in thè way of 
engineers, technicians and scientists. 
To be good at this craft calls for start- 
ing young. . .preferably at 12 to 15 
years of age. Later starters seem to 
seldom have thè enthusiasm and per¬ 
sonal interest of thè dedicated teen- 
ager. Well, with but one licensed 
radio amateur in all of Taiwan, and 
with radio of almost any kind off lim- 
its to ldds, it is not surprising that 
there are so few technicians. If 
Taiwan is going to seriously compete 
in thè electronics field thè country is 
going to have to make some big 
changes. 

I recently attended thè third elec¬ 
tronics show I’ve seen in Taiwan. It 
was most disappointing. The prod- 
ucts were almost entirely rip-offs of 
Japanese products such as thè Sony 
Walkman. The quality was disap- 
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Introducing thè Most Powerful 
Business Software Ever! 


TRS-80™ (Model I, II, III, or 16) • APPLE™ • IBM™ • OSBORNE™ • CP/M™ • XEROX™ 



The VersaBusiness" Series 

Each VERSABUSINESS module can be purchased and used independently. 


or can be linked in any combination to form a complete, coordinated business System. 


VERSARECEIVABLES™ $99.95 

VERSARECEIVABLES™ is a complete menu-driven accounts receivable, invoicing, and 
monthly statement-generating System. It keeps track of all information related to who 
owes you or your company money, and can provide automatic billing for past due ac¬ 
counts. VERSAReceivables™ prints all necessary statements, invoices, and summary 
reports and can be linked with VERSALEDGER II™ and VERSAlNVENTORY™. 

VERSAPAYABLES" $99.95 

VERSAPAYABLES™ is designed to keep track of current and aged payables, keeping you 
in touch with all information regarding how much money your company owes, and to 
whom. VERSA PAYABLES™ maintains a complete record on each vendor, prints checks, 
check registers, vouchers, transaction reports, aged payables reports, vendor reports, 
and more. With VERSAPAYABLES™, you can even let your computer automatically select 
which vouchers are to be paid. 

VERSAPaYROLL™ $99.95 

Versa PAYROLL™ is a powerful and sophisticated, but easy to use payroll System that 
keeps track of all government required payroll information. Complete employee records 
are maintained, and all necessary payroll calculations are performed automatically, with 
totals displayed on screen for operator approvai. A payroll can be run totally, automati¬ 
cally, or thè operator can intervene to prevent a check from being printed, or to alter 
information on it. If desired, totals may be posted to thè VERSALEDGER IT" System. 

VERSAlNVENTORY™ $99.95 

VERSAINVENTORY™ is a complete inventory control System that gives you instant access 
to data on any item. VERSA INVENTORY™ keeps track of all information related to what 
items are in stock, out of stock, on backorder, etc., Stores sales and pricing data, alerts 
you when an item falls below a preset reorder point, and allows you to enter and print 
invoices directly or to link with thè VERSA RECEIVABLES™ System. VERSA INVENTORY™ prints 
all needed inventory listings, reports of items below reorder point, inventory value re¬ 
ports, period and year to-date sales reports, price lists, inventory checklists, etc. 


ÌCQMP11TRQNICS" 

50 N. PASCACK ROAD, SPRING VALLEY, N.Y. 10977 


VERSALEDGER II" $149.95 

VERSALEDGER IF" is a complete accounting System that grows as your business 
grows. VersaLedger IF" can be used as a simple personal checkbook register, 
expanded to a small business bookkeeping System or developed into a large 
corporate generai ledger System without any additional software. 

• Versa Ledger IF" gives you almost unlimited Storage capacity 

(300 to 10,000 entries per month, depending on thè System), 

• Stores all check and generai ledger information forever, 

• prints tractor-feed checks, 

• handles multiple checkbooks and generai ledgers, 

• prints 17 customized accounting reports including check registers, 
balance sheets, income statements, transaction reports, account 
listings, etc. 

VersaLedger II™ Comes with a professionally-written 160 page manual de¬ 
signed for first-time users. The VersaLedger IF" manual will help you become 
quickly familiar with VersaLedger ir*, using complete sample data files 
supplied on diskette and more than 50 pages of sample printouts. 


SATISFACTION GUARANTEED! 


Every VERSABUSINESS™ module is guaranteed to outperform all other competitive systems, 
and at a fraction of their cost. If you are not satisfied with any VERSABUSINESS™ module, you 
may return it within 30 days for a refund. Manuals for any VERSABUSINESS™ module may be 
purchased for $25 each, credited toward a later purchase of that module. 


To Order: 

Write or cali ToU-free (800) 43 1-2818 

(N.Y.S. residente culi 914-425-1535) 

* add $3 for shipping in UPS areas * add $5 to CANADA or MEXICO 

* add $4 for C.O.D. or non-UPS areas * add proper postage elsewhere 


DEALER INQUIRIES WELCOME 

All prices and specifications subject to change / Delivery subject to availability. 


* TRS-80 is a trademark of thè Radio Shack Division of Tandy Ccrp. ‘APPLE is a trademark of Apple Corp. ‘IBM is a trademark of IBM Corp. ‘OSBORNE is a trademark of Osborne Corp. 
ar «ri Daartar Sarvir.A carri *CP/M is a trademark of Digital Research ‘XEROX is a trademark of Xerox Corp. 
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pointing. There was only one sign of In Japan, where just about every 

originality.. . an Apple-eompatible teenager is exposed to both amateur 
computer called thè Micro-Professor, radio and computers, and where they 
We’ll have more for you about this have over 900,000 licensed radio 
System when a sample arrives for us amateurs, creativity and enthusiasm 
to check out. Other than that, thè for electronics is thè best in thè 
computers were all Apple copies. world. It is going to take some doing 

I understand that there is a good for Taiwan to catch up with this 

possibility that Taiwan may soon lead. . . if they ever can. ■ 

“The pity of it is that thè 

Chinese are very hard workers... 
they just lack thè education 
needed to create new 
electronic produets.” 
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move to encourage amateur radio 
and thus try to attract teenagers. 
This, plus thè introduction of micro- 
computers into their schools could 
tum around thè problems Taiwan is 
having. 

As I wandered through thè hun- 
dred or more exhibits at thè Taipei 
Consumer Electronics Show, I won- 
dered where thè myriad of copies of 
Walkman cassette players are being 
sold. I wondered at thè dozens of 
makers of pens with watches in them. 
When I talked with some of these 
manufacturers I found out more 
about it. The fact is they’re having a 
hard time selling these rip-offs. The 
world is wising up to thè Taiwanese 
quality and lack of creativity, and 
this has been hurting sales. 

In thè Apple rip-off field there are 
over a hundred firms, yet most of 
them are relatively small. . . some 
with only two or three people turning 
out a few Apples a week. Not all are 
copying thè Apple logo. Some are us- 
ing other names such as thè Banana, 
thè Lemon, thè Tangerine, and so 
on. But they’re all in Apple-type 
cabinets, so no one is fooled. The pity 
of it is that thè Chinese are very hard 
workers... they just lack thè educa¬ 
tion needed to create new electronic 
produets. Education denied them by 
their govemment, so to speak. 

Letters 

inCider feels that one of its most 
important roles is to provide a forum 
for readers. We welcome letters for 
publication with comments on arti- 
cles 9 embellishments to programs , 
appeals for information — whatever 
you feel moved to write. Address 
your correspondence to Letters to thè 
Editor , inCider, Pine St. 9 Peter- 
borougfi , NH 03458. 

At this writing our first issue has 
just hit thè stands. We are fortunate, 
therefore, to already have one Letter 
to thè Editor . Can anyone help? 

— thè editors 

Dear inCider, 

Can you direct me to a source of 
information on how to prepare a disk 
on my Apple II so it cannot be cop- 
ied? I have written to thè Apple 
Computer people, but they don’t re- 
spond. I have also asked thè dealer 
where I bought thè computer, but 
they seem to know less about thè 
equipment than I do. 

William Volk 
44 Wheatsheaf Lane 
Princeton, NJ 08540 
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The Missing Ring 
$29.95 for Apple II* 

EDATAMOSH 


9748 Cozycroft Ave., 


Chatsworth, Ca 91311. 
(213) 709-1202. 


Now experience adventuring in a brand new way. Attempt to win through on your own, or with 
decision-making characters playing at thè same time! Either way, there’s new involvement and 
enjoyment because you II see all thè magnificent characters on-screen as you travel and 
unravel thè clues. 

Your quest is to find thè wizard’s ring which has been missing for aeons. Many 
have searched for it... unsuccessfully. So, you know thè hazards are many 
—thè traps are ingenious—and solving thè puzzle takes great wit. 

But take heed. For plotting your way through thè mysterious, 
magical rooms takes cleverness and a doublé dose of 
courage. And thè more of you on thè quest, thè more 
intriguing and difficult thè task becomes. The 
strong of heart can succeed where others fail 
and win through to find thè ancient missing 
ring. Are you thè one? 


VISA/MASTERCARD accepted. $2 00 shipping/ 
handling charge (California residents add 6'/;% 
sales fax.) 

‘Apple II is a trademark of Apple Computer. Ine 
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■inCide Out 


February is Fantastici 


A brand new graphics coluinn 
makes a grand entrance, and an 
inside look at CP/M PLUS is a 
must if you’re considering GP/M. 
Much more to follow... 


F udge It! Not what you re think- 
ing. Only thè commencement 
of our graphics column by that rascal 
Don Fudge of Avant-Garde Crea- 
tions. This month’s installment 
covers vector shape tables—and 
shows you how to easily manage 
them. The mysteries of Apple 
graphics need not be as confusing as 
you thought! 

Dan Bishop’s Applesoft Adviser 
continues thè instruction regarding 
Applesoft variables, and Peggy Bur- 
nett’s data tutoria! marches forward 
brisldy. Reviews? PlentyEverything 
from thè UCSD p-System and Sensi- 
ble Speller to some very popular 
games. Also, “Keyboard Graphics” 
proves that graphics capabilities on 
thè Apple need not be complex. For 
thè literati, an epistemologica! play 
leaves you waiting. 

Business more your bent? Two 
business programs, one dealing with 
graphics application, thè other with 
pressure, are found inside inCider . 
Pascal programmers are bound to 
find Screen Shepherd helpful in their 
own programs—David Kutzler 
shows you how to control thè elusive 
cursor on your screen. And John 


Stephenson’s “Pascal Primer” will 
whet your appetite for more. 

If you can’t live without some form 
of hardware modification to busy 
your fingers, youll find thè first part 
of an EPROM programmer in this 
issue, as well as a printer interface for 
thè Epson IL 

Apple III owners and users can 
find thè second installment of Bill 
O’Brien’s entertaining column, IIFs 
Company. The reprobate Paul Ray- 
mer comes alive with twin programs 
in OutCider, and has also managed 
to capture thè guest editorial spot 
with an expose of computer advertis¬ 
ing. Apple graphics are also tackled 
in stili another tutorial entitled 
“Higher Resolution Apple Graphics.” 
San Francisco’s Applefest is re- 
viewed, and inCiders Hints ’N’ 
Techniques department retums with, 
of all things, a way to downgrade 
your Apple! 

String art finds its way into thè 
Graphics Goodies department, and 
Wayne reveals a little more about 
himself. A rather full and outstand- 
ing selection of useful material. And 
if you think this issue is good, just 
wait until March! 

—thè editors 
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DIAMONDS 
STAR MAZE 
EXECUTIVE 
SECRETARY 
PFS 

SNOOPER TROOPS 
#1 

STORY MACHINE 
S.E.U.I.S. (SHOOT 
‘EM UP IN SPACE) 
GALACTIC 
GLADIATORS 
EDIT SOFT 


SALE 

24.95 

23.95 

175.00 

84.95 

31.95 

24.95 


RETAIL 

34.95 

34.95 

250.00 

125.00 

44.95 

34.95 


27.9 5 39.95 




BUY NOW!: 

Pnees will never be* 
this LOW again and'" 
quantities of items 
are limited! 


/ rfrf 

in Oregon cali 

1-342-1298 

No C.O.D. orders at 
sale prices. 

FREE SHIPPING 

on orders of $100.00 or 
more. 
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SAVE» 

OUR GOAL: 

To LIQUIDATE OVER 

$ 1 , 000 , 0009 ° 

of SOFTWARE at SACRIFICE PRICES! 

SAVE ON INSOFT • ON-LINE • DATAMOST 
BRODERBUND • PENGUIN • AND MORE! 





QUICKS0FT 

L1QUID ATI0N 


PRICE 

RETAIL 

APPLE SPICE 

22.45 

29.25 

CHOPUFTER 

24.81 

34.95 

SERPENTINE 

24.81 

34.95 

VERSAF0RM 

263.40 

389.00 

TEMPLE 0FAPSHAI 29.95 

39.95 

THE GUARDIAN 

19.95 

29.95 

HI-RES SECRETS 

70.00 

125.00 

HI-RES 

19.95 


COMPUTER GOLF 

29.95 

UTILITY CITY 

21.95 

29.50 

APPLE MECHANIC 

21.95 

29.50 

BEAGLE BAG 

21.95 

29.50 

SPACE QUARKS 

19.95 

29.95 

GENETIC DRIFT 

19.95 

29.95 

THE ARCADE 

39.95 


MACHINE 

54.95 

DUELING DIGITS 

21.20 

29.95 

BANDITS 

24.95 

34.95 

ESCAPE FR0M 

21.95 


RUNGISTAN 

29.95 

FREE FALL 

THE BLADE 0F 

21.95 

29.95 

BLACKP00L 

29.95 

39.95 

TWERPS 

21.95 

29.95 

AUDREX 

22.50 

29.95 


OFFER LIMITED TO STOCK 


>CK ON HAND. 

ÌiàAU /1 


guarant«di 

- NEW merchandise 

and carri ®f a nlee’ 

regalar guarantee. 



SALE 

RETAIL 

AZTEC 

29.95 

39.95 

TUBEWAY 

24.95 

34.95 

SNACK ATTACK 

20.95 

29.95 

W0RDRACE 

18.95 

24.95 

1 SPELLING BEE 

1 w/READINGPRIMER 27.95 

39.95 

00-T0P0S 

22.95 

32.95 

MIN0TAUR 

23.95 

34.95 

TYPE ATTACK 

28.95 

39.95 

PRIS0NER II 

23.95 

32.95 

NEPTUNE 

19.95 

29.95 

LAZER SiLK 

19.95 

29.95 

PIE WRITER/ 

109.95 


MULTI 80-C0L. 

149.95 

REAL ESTATE 



ANALYZER II 

145.00 

195.00 

Z0RK 1 

29.95 

39.95 

JUGGLER 

19.95 

29.95 

GRAF0RTH II 

52.95 

75.00 


GERTRUDE’S 
SECRETS 
ROCKY’S B00TS 
MASTER TYPE 
LETTER PERFECT 
w/MAIL MERGE 
ROACH HOTEL 
WORDSTAR 
DATASTAR 
TIME MANAGER 
MUSIC MAKER 
HI-RES ADV#4 
ULYSSES & THE 
GOLDEN FLEECE 
SCREENWRITER I 
PEST PATROL 
LUNAR LEEPER 
COMPLETE 
GRAPHICS SYSTEM 49.95 
WIZARDRY 33. 

SPECIAL EFFECTS 
GRAPHICS 
MAGICI AN 
THE BIRTH OF 
THE PHOENIX 
COPY II + 

ALI BABA & THE 
FORTY THIEVES 
SUPER DISK 
COPY III 
MULTI DISK 
CATALOG III 
DOS PLUS 


109.95 

23.95 

169.95 
147.50 

101.95 

26.95 

23.95 
i 97.95 

22.95 
22.95 


33.95 

27.95 


SALE RETAIL 

52.95 75.00 

52.95 75.00 

27.95 39 95 


149.95 

34.95 
495.00 
295.00 
150.00 

39.95 

34.95 

129.95 

29.95 

29.95 

69.95 

49.95 

39.95 


41.95 59 95 

15.95 

23.95 


22.95 

20.95 

17.00 

17.95 


22.00 

39.95 

32.95 

30.00 

25.00 

25.00 


Tenms of this sale:Aòd 4% for Visa and 
MasterCard orders. All items subject to prior 
sale. Prices subject to change without notice. 


JUST A SAMPLE OF THE SAVINGS YOU’LL FIND! 
CALL IF YOUR PRODUCT IS NOT LISTED! 

FOR ORDERING CALL 

1 - 800 - 54 _ 7 - 8009 _ 

yUkiiOn 

Department 9, P.O. Box 10854 Eugene, OR 97440 

Copyright 1982 Microcomputer Support Group, INC. 
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Fermentations 


As a salute to you, olir readers, inCider would 
like to publish your thoughts on issues confronting 
thè computer industry. This month our guest 
editor, Paul Raymer, has some definite ideas 
regarding thè advertisements that grace thè pages 
of today’s computer publications. 


Each day I anxiously anticipate 
thè mail delivery, hoping to receive 
one of my many computer magazines 
so I can get thè newest scoop on excit- 
ing developments in thè world of per¬ 
sonal computers. I thoroughly reati 
each magazine page by page, dili- 
gently study each article, read every 
column, jot down every helpful hint, 
and study in great detail thè exciting 
full page and full color ads from thè 
various computer manufacturers. 

Aside from trying to under- 
stand binary files, machine language 
and magazine label subscription 
codes, my biggest problem with these 
publications is relating to thè ads. 

It may be that as a computer own- 
er I take a different attitude than, 
say, a prospective owner, because 
mostly I use my computer. Now. Ev¬ 
ery day. For every possible use. 
When I look at many of thè ads I find 
it difficult to imagine that computer 
in my environment. 

Let’s look at some of thè ads com- 
pared to thè computer lite I lead! 

The first (Figure 1) is headlined 
“Take Stock In Your Future” and 
shows this guy with a pipe and a dog 
watching text scroll on his 17-inch 
(43.18-cm) color TV as two sets of 
graphs squiggle about. Just thè 
thought of ashes on my keyboard 
makes me cringel The dog obviously 
has no interest in thè computer or thè 
stock market, since he/she is not 
watching thè screen but rather eye- 
ing thè candy in thè nearby dish. My 
dog plops on thè floor and moves only 
when an excessive number of ?SYN- 
TAX ERRORS makes thè bell on my 
computer ring too often. 

And just look at thè computer—no 
hands on it and no paper or pencil— 
doing its merry thing with light only 
from thè 60-Watt (855-lumen) table 



lamp about eight feet (2.4384 meters) 
away. This manufacturer certainly 
makes a strong point that their com¬ 
puter can do more than just play 
games. 

The next ad (Figure 2) is fun. After 
all, who doesn’t like this happy TV 
star? The computer is really neat be¬ 
cause it (like so many others) has no 
wires to hook up and get in your way. 
Instant keyboard, color monitor and 
peripheral expansion System. And— 
it’s easy to expand. But, apparently, 
not on thè little teeny table support- 
ing thè three components. There isn’t 
even room for a writing pad, a couple 
of disks or any reference material. 

My computer dòesnt live in such a 
nice environment. All my stuff is 
stacked on top of everything else and 
all of it is piled on a 6-foot by 30-inch 
(1.8288-meter by 76.2 cm) table. 
That gives me room for my 10 mini- 
boxes of disks for quick reference, my 
tray of utility disks, four or five un- 
classified mystery disks lying about 
and sheets of notes, papers, clippings, 
folded magazines and two kinds of 
graph paper. Then, luckier than 
most I suppose, I have a printer that 
sets on thè far end of my desk, avail- 
able as whim dictates. And wires—I 
have wires coming and going in and 
out of more slots, holes, devices and 
things anyone (except those folks in 
Texas) could dream of. 

Then I read thè next ad (Figure 3) 
and notice it features thè Logo pro¬ 
gram for teeny kids to use with a Col- 
or Computer. It shows these two 
adorable youngsters both using thè 
computer at thè same time, thè little 
girl watching thè screen and thè little 
boy watching thè little girl. Wow! 
And you thought sex only sold ciga- 
rettes, beer and financial programs! 
The kids are nonchalantly pressing 
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Somewhere on each floor of thè Soviet diplomatic mission in 
Pyongyang are thè nine parts of an encoded message. Your 
future is assured if you can just find those pieces and put 
them together, and then solve thè puzzle. But to do so you 
must avoid thè embassy guards who make frequent rounds at 
unscheduled intervals. They don’t ask questions first, either. 





You got a late start looking for that summer job, and all you 
could find was a baker apprentice position at thè Automated 
Bakery Company. Simple enough, since thè pies are made 
by machine ... all you have to do is add topping and put 
thè pies away when they come out on thè conveyor belt. 
Shouldn’t be too difficult of a summer, you think to 
yourself . . . 


A High Resolution Graphic Adventure 


Crafted by Antonio Antiochia 

Transport yourself to thè dark forests of Transylvania, where 
mystery lurks behind every towering tree, and venture to 
rescue a damsel in distress. Transylvania uses over one 
hundred colors and thè finest graphics ever seen in a high 
resolution adventure to present a true challenge and hours of 
enjoyment to all adventurers. 



Above games now availabie for thè Apple computer. Arcade games work with keyboard, joystick, or Atari joystick. Graphics for all above created with thè aid of The Graphics Magician. 



penato software thè graphics people 

830 4th Avenue Geneva, Illinois 60134 (312) 232-1984 


Circle 23 on Reader Service card. 


Apple is a trademark of Apple Computer, Ine. 


Atari is a trademark of Warner Communications, Ine. 















-Circle 82 on Reader Service card. 



-Fermentations- 


Everyday Catalog 
Tax Specials 


LIST OURS 
Tax Manager $180.00 $139.99 
Tax Preparer ’83 $225,00 $189.95 
Tax Beater $129.95 $ 99.95 


Strictly Soft Wcrre 1-800-848-5253 


I-1 

To receive your free catalog right 
away, send this coupon to thè dddress 
below. Do you wdnt our □ Apple or 
□ IBM Cdtdlog? 


NAME 


STREET 


CITY 

( ) - 

PHONE 


STATE 


ZIP 


Strictly Soft Ware 
P.O. Box 338 
Granvilìe, OH 43023 
Phone Orders & Technical 
Assistance: 1-800-848-5253 
In Ohio: 1-614-587-2938 



Radio Shacks new Color LOGO helps 

them use thè most powerful 
processore in thè world... 



.p/fix'. Grufitijy. -3j^ Stwtefj»; >»t5f • f/JCO, OV/ 

r<*uh a«* A*i zi> Afc 
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. their own minds. 
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Figure 3. 


keys, producing a multi-color high- 
resolution symmetrical illustra- 
tion. . . and all by memory (or pure 
chance), since no instruction book, 
no teacher or parent, no notes, no 
disk or cassette interfacing is appar- 
ent. It is truly inspiring! 

I have trouble with Basic, so surely 
Logo would be too tough for me. 
Since my wife thinks my computer is 
kind of dumb anyhow, and she cer- 
tainly wouldn t let girls play games 
with me, and I have trouble under- 
standing Paul Lutus’ instructions for 
“Electric Duet” and Mark Pelczarski’s 
booklet on thè “The Graphics Magi- 
cian” (although I have learned how 
to speli Mark’s name), what chance 


would I have with Logo? But then, 
my computer has things hooked up to 
it, like two disk drives, a tape 
recorder, a cooling fan, two paddles 
(optional) and a joystick. 

The last ad (Figure 4) is a dandy. 
The headline reads “Right away, you 
can see a difference,” and you certain- 
ly can. This girl dressed in a bum’s suit 
is amazed by thè flashing monitor 
screen. No wonder. Another comput¬ 
er with no electrical cords. And this 
one is working. The flower makes a 
really neat touch, but I have thè feel¬ 
ing there is no water in thè vase. 

At my computer I have too much 
trouble with klutzy typing to use 
gloves. And as many sympathetic 
computer users out there will under- 
stand, using a computer while stand¬ 
ing is little short of impossible. I have 
enough trouble with strange little 
things that creep into my programs (I 
understand some folks cali them 
bugs) that Fm not at home near a 
computer without a book, a pad, a 
pinup calendar (well, that may not 
be necessary), a programmerà 
guide. . . and a chair. 

Next time, Fd like to teli you how I 
feel about many of thè “powerful” 
programs I see advertised in thè same 
magazines. 

Contributed by Paul Raymer 
Las Vegas, NV 


Right away, 

you can see a difference. 



The IBM Personal Computer 
\ tool tor modem times 


Figure 4. 
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S1JTGIES’ JT1GJfo 

ìUGLLH’S 


By Norman J. Wazaney Jr. 


OUR SOFTWARE IS 
UMPROTECTED PERMITTING 
^ CONVEN1ENT BACK UP. 


You never dreamed 
Solitaire could be so fascinating. 

Solitaire in a saloon can be firn but it's better to be derived from this intriguing game. Available 

on your Apple*. Fair waming: if you get hooked on now for only $29.95 at computer Stores. 

Solitaire, beware of this game! "Singles' Night at 

Molly's" is actually two basic solitaire card games To order by phone, cali 800-526-9042 and use 

with several variations permitting you to use thè your Visa or MasterCard. All shipments made thè 

skill level and strategy you enjoy most. Play alone or same day in which orders are received. To order by 

against other players, where a rating System declares mail, add $1 for shipping charges and send your 

thè winner. Features High Resolution color graphics, check to: 

full user documentation and various scoring potendals. Soft Images, 200 Route 17, Mahwah, NJ 07430. 
There are hours, days, even years of pleasure 


"Singles' night'' runs on 48K Apple II, Applesoft in ROM. 
3.3 DOS/One Disk Drive 


Circle 210 on Reader Service card 
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edited by John P. Mello, Jr. 


Apples, Others, Target 
of TRW Center _ 

Repair of personal micros by TRW raises 
eyebrows in some circles. 


A move by TRW to charge into 
thè free-lance repair of per¬ 
sonal computers was questioned by 
some major computer manufac- 
turers. 

The firm’s Fairfield, NJ, Customer 
Service Division opened a personal 
computer service center in Dallas, 
TX, last October and its sights are set 
on opening more next year. 

“Were taking thè hassle out of per¬ 
sonal computer repair for thè in¬ 
dividuai consumer,” he observed. 
“The speed and efficiencv of Service 
this center will provide are going to 
set standards for thè industry.” 

The center will service most major 
brands of computer-related equip- 
ment including video games and 
Apples. 

For firms, like Apple, requiring 
their dealers to provide service, TRW 
could offer an alternative service 
channel. A number of dealers and 
distributors have approached TRW, 
Marketing Communications Manag¬ 
er David F. Gill claimed, and said 
thè service center approach was a 
“great idea.” He added, “They’d 
rather concentrate on selling and let 
us service it.” 

But Apple Computer doesn’t see it 
that way. 

“I can’t really see us letting thè 
dealers off thè hook as far as taking 
care of service and support responsi- 
bilities,” said DickBaumann, Apples 
service/support marketing manager. 

“It’s a company philosophy that 
we would like our dealers to give thè 
service and support our customers 
need. A lot of what’s going to differ- 
entiate one computer from another in 
thè future is going to be those kinds of 
service support issues.” 

Gene Carson, one of thè center’s 
managers, feels short turnaround 
time will be a major plus for thè 


store. “When your personal comput¬ 
er breaks down,” he said in a state¬ 
ment, “you won’t have to ship it to a 
remote service center and wait days 
or weeks for its return. Just drop thè 
equipment off at our center and, in 
most cases, we will have it ready for 
you within 24 hours, sometimes even 
while you wait.” 

The center will chiefly do compo- 
nent repair, Marketing Communica¬ 
tions Manager Gill explained. Com- 
ponents will be repaired on their 
originai boards. However, there’s an 
exception to this rule when there’s 
heavy traffic in an item. “We’ll say, 
‘Okay, these boards are thè ones that 
typically go bad,’ ” Gill said. “We’ll 
stock those boards, replace them 
when they come in, and turn them 
around in 10 minutes.” 

He explained, “A lot of things that 
go wrong with a micro are very com¬ 
mon and don’t require an exotic part 
or something of that nature.” 

“Printers give thè biggest problems 
of thè mechanical devices,” he con- 
tinued. “Any mechanical device is 
subject to wear.” 

Inside thè micro, he noted, prob¬ 
lems usually originate with disk 
drives, which are mechanical, or 
blown fuses. 

He added, “The biggest single 
problem is mishandling diskettes.” 

Prices at thè center are fixed at 
$25, $50 and $100, Gill said. If it ap- 
pears a repair will cost more than 
$100, a customer is notified. “We will 
do an estimate on it,” he added, “and 
stick to that estimate.” 

Manager Carson said thè center 
warranties repairs for up to 90 days. 
Future plans cali for service contracts 
where customers can sign yearly 
agreements to cover maintenance 
and service on their equipment. 

The center also provides computer 


supplies, software, publications, and 
a computer bulletin board. 

Gill added thè center will upgrade 
a customer’s micro. “We will not rec- 
ommend anything,” he said. “How¬ 
ever, if someone comes in and asks if 
this thingamajig will work with that 
gizmo, we will look at it and teli 
them if it will or won’t.” 

Extensive expertise and a large 
parts inventory are keys to thè 
center’s effectiveness, Carson main- 
tained. 

“Our four managers have nearly a 
half century’s experience among 
them,” he said. And according to 
TRW, its service division Services 
more than 700,000 pieces of equip¬ 
ment for 80,000 customers and makes 
more than 2 million service calls 
annually. 

“We have an extensive parts inven¬ 
tory,” Carson added, “and what we 
don’t have we can get over night from 
one of our commercial repair 
centers.” 

Carson’s statement mystified Jon 
Campbell, press relations manager 
for Texas Instruments’ Consumer 
Group. “I spoke to thè people that 
run our repair center and they have 
not heard from TRW about this,” he 
told 80 Micro. “They were a little 
puzzled. How could TRW do repairs 
on thè 99/4A if they haven’t con- 
tacted us for spare parts?” 

He said, “We do not have any out- 
side arrangements to repair our units 
and we are not looking for any.” 

He added if a 99/4A were stili 
under warranty when TRW repaired 
it, thè TI warranty would be voided. 

Texas Instruments has 50 exchange 
centers in thè nation, he explained, 
where, if a 99/4A breaks down, its 
owners may exchange it for a new 
one or have it repaired. Exchanges 
are free during thè warranty period, 
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Play Like A Winner! 


This complete System provides simple, step-by- The comprehensive documentation is packaged 


step instructions to help you raise your level of 
play regardless of your present skill. Eeatures 
include a SIMULATOR for testing betting and 
playing strategies, a TUTOR to teach thè 
strategies and a GAME with all thè options 
available at thè casinos. Another outstanding 
feature is a Strategy Table Compiler for ease 
of entering and visualizing your playing and 
betting strategies. 

The System is able to simulate millions of 
hands and provides better insight into computing 
odds and house percentages. You may be 
surprised to discover how many of your pet 
theories are less than accurate. 


in a handsome, easel-backed binder. Available 
now for only $69.95. 

Since winning is always more firn than losing, 
be fair to yourself and get Black Jack Strategy 
before your next visit to thè casino (where $69.95 
will not go very far). 

To order by phone, cali 800-526-9042 and use 
your Visa or MasterCard. All shipments made thè 
same day in which orders are received. To order 
by maiL add $1 for shipping charges and 
send your check to: 

. DMSION Of DECÌSICI SYSIEMS INcT'^'. W 

200 Route 17, Mahwah, N.J. 07430, 


Black Jack Strategy runs on 48K Apple II, Applesoft in ROM. 
3.3 DOS/One Disk Drive Printer Optional 


Circle 211 on Reader Service card. 
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BACKUP. 


‘Apple II and Applesoft are registered trademarks of Apple Computer Cc 
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$45 after thè period ends. Costs for 
repairs range from $25 to $80. 

Other computer manufacturers 
hadn’t heard of TRW’s efforts in ser- 
vicing personal computers. 

Commodore, whose business Sys¬ 
tems are serviced by TRW, was un- 
aware thè TRW center might be ser- 
vicing VIC 20s. 

A spokesman for Commodore said 
if something goes wrong during thè 
VIC 20 s warranty period, it can be 
returned to point of purchase for a 
new machine. After thè warranty ex- 
pires, he added, VIC 20s are sent to 
one of Commodore’s factories and 
thè user is sent a factory recondi- 

Gray 
Market 
Makes 
IBM 
See Red 

International 
Business 
Machines follows 
path of Apple. 

I nternational Business Machines 
has taken a page out of Apple 
Computerà book and notified its ap- 
proved personal computer dealers 
that selling to unauthorized resellers 
could lead to termination. 

According to thè Electronic News , 
in a bulletin issued from its Systems 
Products Division in Boca Raton, FL, 
thè Big Blue stated: 

“Adherence to thè requirements of 
this bulletin is required to assure end- 
user satisfaction and meet thè terms 
of thè Dealer Agreement. Failure to 
adhere to these terms and conditions 
would be considered a breach of con- 


tioned unit within 48 hours. 

“The Commodore 64,” he said, “is 
only being sold through computer 
dealers. All computer dealers are re¬ 
quired to be service centers as well. 
The dealers can solve 90 percent of 
thè problems that come up. The 
other 10 percent will be referred to 
regional service centers.” 

An Atari spokeswoman said she 
recommended Atari computers be 
brought only to thè 1500 service 
centers thè firm has established acro ss 
thè country. 

The first TRW center opened last 
October. This month or next, TRW 
will be assessing it to see if they 


tract and could result in termination 
as an Authorized IBM Personal Com¬ 
puter Dealer.” 

Reportedly, IBM attorneys are re- 
viewing thè status of at least one au¬ 
thorized dealer who is said to have 
unloaded stock to an unauthorized 
New York City reseller. 

The electronics industry newspap- 
er reported that thè bulletin to IBM 
dealers, dated Oct. 29, 1982, was 
issued following thè reported cutback 
by IBM in thè availablity of low- 
memory versions of its personal 
computer. 

Several authorized dealers told thè 
Electronic News IBM has curtailed 
production of a 16K model of its Per¬ 
sonal Computer to prevent unau¬ 
thorized dealers from purchasing thè 


should start up more of them. “If 
things are growing and weve got a 
steady trend upward, we will expand 
to as many as 15 more places next 
year,” Gill said. 

Planning and Development Direc¬ 
tor Harnett added, “Besides provid- 
ing first-rate service, I believe these 
centers will help take some of thè 
mystique out of computer usage. 

“The more people realize that com¬ 
puters can be like other equipment 
they use daily to make life easier, thè 
more computers will be found in thè 
smaller office and home. By repair- 
ing them quickly and effectively, 
we’re promoting this message.”B 


unit, upgrading it with inexpensive 
RAM and disk drives to imitate thè 
64K version of thè PC, and market¬ 
ing thè maverick machine at prices 
well below thè prices offered by ap- 
proved dealers. 

The industry Journal quoted IBM 
Director of Sales and Service H. L. 
Sparks as saying, “We are starting to 
see some more of it [unauthorized re- 
selling],” but “It is not at a level that 
would generate great concern. He 
said IBM issued thè bulletin “to fur- 
ther amplify for our dealers some 
things we have covered before.” 

The bulletin IBM sent to its dealers 
does not specifically mention under- 
selling by unauthorized dealers as a 
concern, but points out that thè sale 
by unauthorized dealers threatens to 



IBM PC: Wildcat upgrades irk Big Blue. 
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TRS-80 MOD I/III 48K TRS-DOS 
TRS-80™ Radio Shack/Tìandy Coip. 

48K Apple II, Applesoft in ROM, 3.3 DOS 
Apple is a registered trademark of Apple Computer Co. 
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UK Micro Makers Cali 
for Embargo 


Purchase of Apples by leading British bank pumps ire 
of one computer manufacturer. 


tarnish IBM’s reputation for Service 
and support. 

The bulletin also noted, “The 
delivery of initial systems and prod- 
ucts to users by other than a personal 
meeting between thè end-user and 
trained dealer personnel is not consis- 
tent with thè principle of end-user 
satisfaction through dealer support/' 

Recognizing that a cadre of third- 
party add-on suppliers is emerging 
with products that enhance thè IBM 
Personal Computer, thè Big Blue said 
in its bulletin that thè dealer need not 
be involved in thè user’s addition of 
non-IBM add-ons. 

Meanwhile, IBM reportedly is 
considering terminating one of its au- 
thorized dealers for selling PCs to 
47th Street Photo, a New York City 
electronics dealer. 

Late last year, 47th Street priced a 
64K IBM system at $3299. That Sys¬ 
tem included two Tandon 320K disk 
drives, 12-inch black and white 
monitor, and a monitor adapter. 

The IBM bulletin, Electronic 
News said, echoed a letter sent last 
spring by Apple to its dealers. In that 
letter, thè Cupertino firm threatened 
to cut off any unauthorized dealer 
selling to unauthorized resellers. 

At thè time, Vice President for 
Marketing Gene Carter noted Apple 
had “become increasingly concerned 
about sales of Apple products by 
unauthorized dealers,” and said any 
dealer that had been marketing to re¬ 
sellers should cease doing so or face 
termination. 

Carter later told thè Electronic 
News Apple, before thè end of 1982, 
would act against dealers violating 
their agreements with Apple. 

The industry weekly said Apple 
has retained a Phoenix law firm to in¬ 
vestigate thè matter. The firm is 
checking thè origin of thè Apples sold 
by unauthorized dealers by buying 
from them and tracing thè purchases 
through their serial numbers. 

Apple's investigation of unauthor¬ 
ized transhipping follows its ban late 
last year of mail order and telephone 
sales. That ban led to thè dismissal of 
six dealers, who currently are con- 
testing their termination in federai 
court in Los Angeles. ■ 
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A UK computer executive railed 
against fellow Britishers buy¬ 
ing Apple micros at a press con- 
ference calling on Prime Minister 
Margaret That eh er to impose a one- 
year embargo on U.S. and Japanese 
micros. 

According to MicroScope , a micro¬ 
computing fortnightly published in 
thè United Kingdom, John Burrow, 
marketing director for Casu Elec¬ 
tronics, rapped a major British bank 
for buying “those damn Apples.” 

Burrows claimed thè bank bought 
thè Apples because one of its execu- 
tives’ sons had one at home. 

The marketing director refused to 
name thè bank in question. How- 
ever, later in thè press conference, he 
recalled how “Barclays Bank had ne- 
glected to buy British.” 

The import embargoes were de- 
manded by thè British Microcomput- 
ers Manufacturing Group. 

MicroScope reported thè group 
also wants all British microcomputer 
manufacturers to be considered for 
government contracts as a right, to 


thè exclusion of foreign micro 
makers. 

“The BMMG does not suffer from 
xenophobia,” said managing director 
of LSI Computers Tom Fitzpatrick, 
“but we do feel that we cannot over- 
emphasize thè problems which will 
face this country 7 if we allow our mi¬ 
crocomputer industry to be smoth- 
ered in its infancy by unfair foreign 
competition.” 

He said UK micro makers had in- 
sufficient funds to match thè market¬ 
ing efforts of foreign competitors, 
and that thè UK s Central Computer 
and Telecommunications Agen- 
cy—which selects micros for all gov¬ 
ernment purchases—was helping thè 
foreigners. 

“A <£700 million industry is 
threatened not only by thè Japanese 
and American imports but also thè 
attitude of thè CCTA,” he said. 

David Broad, chairman of Com- 
mart and thè micro group, said for¬ 
eign manufacturers were selling at 
artificially low prices which were 
“unfair to British manufacturers.” 
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Sotti ights 

By Fred Huntington 

Did you know we send out twenty thousand 
or more sales bulletins every two months? 

Did you know that our sales are probably 
thè best sales you ve ever seen? Last month 
we sold thè Elephants at an introductory 
price, thè people who got thè sales bulletins 
were able to buy them a month before thè rest 
of thè country. 

One of thè items in thè current sale is rib- 
bon cartridges (not just refills) for thè MX-80 
at $4.99 each.MX-100 $14.99. 

How do you get on thè mailing list? There s 
only one way. That s to place an order. Re- 
questing a catalog won t do it. But, once you 
buy from us, you re stuck on our mailing list. 

Future sale flyers will contain fabulous bar- 
gains, both old and new items. 

So, to entice you to want to get on thè 
mailing list, there are some super specials 
listed elsewhere in this page. 

SUPER-DUPER JOYSTICKS 

Last month Barb ordered me a Wico 
joystick for evaluation without teliing me first. 
When it carne in I couldn t believe it. It is thè 
most substantial joystick for thè Atari I ve ever 
seen. It s made by thè same people who 
make thè ones for thè commercial arcade 
games. Made for thè Atari, they will work with 
thè Apple with an adaptor or thè Joyport. 
There s also a fancier model with a chrome 
shaft and red ball on top. They also make a 
trackball controller that will blow your mind. 

# 160 Command Controller ($29.95) 

now.$ 24.44 

#161 Red Ball ($34.95) 

now.$ 29.44 

#162 Trackball ($69.95) 

now.$ 54.44 

These prices are good through Jan. 30, 
1983. 

VERBATIM CLEANING KIT - $5.00 

Here s a loss-leader that we hope will en¬ 
tice you to buy from us. When you make any 
purchase, you can but a $12.95 Verbatim 
cleaning kit for only $5.00. One to a customer 
or family, only while supply lasts. When this 
ad was written, there were 400 on thè way to 
us. So, when these are gone, that s it. Order 
stock #4012. 

GENERIC COMPUTER GAMES 

We re revolting! Whoops, I mean we re re- 
volting against high prices in computer 
games. As part of our effort, we are publish- 
ing thè only Generic Computer Games in thè 
world. Originally costing $14.95 each, I ve 
taken Skeet Shoot, Trap Shoot (both HIRES) 
and put them on one disk along with a picture 
of Great Grandma Huntington. 

They are two of thè first games ever pro- 
duced by a very famous software company. I 
bought thè rights for them for $200 and de- 
cided to have some fun with them. 


Made for thè Apple, they come complete tion of printer or software. Our price $ 44 . 99 . 
with a vellow documentation Dace, reminis- 


with a yellow documentation page, reminis- 
cent of what you would find in your locai 
supermarket. (After all, our shipping 
warehouse was at one time a supermarket.) 
Order #9008 for only $ 9 . 99 . 

WURST OF HUNTINGTON 

We re stili getting rave notices about thè 
Wurst of Huntington. People are amazed at 
how we cut thè price of Wurst from $19.99 to 
$ 9 . 99 . Once they see thè program, how- 
ever, they understand. 

One customer wrote us saying that thè 
Wurst was a tribute to beginning program- 
mers all over thè world who would like to sell 
their programs. Another praised us saying 
Wurst was everything we promised. 

So. if you want thè worst eight programs 
ever assembled on one disk (and have a little 
fun, too). order #9010 for $ 9 . 99 . 

COMPUTER ALMANAC 

We thmk that Computer Almanac. written 
by Dave Carman is a good buy. It s a weather 
predicter. a loan amortization program, and a 
wealth of generai knowledge. Order #9014 

for $ 24 . 99 . 

UNDERSTAND YOURSELF 

Written by Mike Taylor, Understand Your- 
self is a series of tests to help you get a better 
psychological msight of yourself. Not meant 
to be a climcal substitute, Understand Your¬ 
self is fascinating and will keep you and your 
mate intrigued for hours. Order #9012 for 
$ 24 . 99 . 

Here s something new for all you Epson 
MX-80 and MX-100 lovers — thè MXPLUS. 
This amazing gadget allows you to use your 
printer buttons to instantly select thè print 
mode you want. 

For instance, press thè on line button 
three times and you have mstant doublé size 
print. Press twice and you have condensed 
print. No soldermg, cutting or drilling. Easy to 
instali. Does not interfere with norma! opera- 






INTEGER FIX, ETC. 

Here s an easy-to-use program that will 
covert your Integer programs to Applesoft in 
nothing fiat. #9543. $ 19 . 99 . 

We also carry thè complete line of Market 
software including Tennis Draw, League 
Schedule, Long Term Reservations. Swim 
Meet, League Standings and more. Cali for 
prices. 

We also have Masterworks, Nutricale, Ex- 
ecuware, PCP. Thesis. and much, much 
more. 

Here s a special to catch before thè price 
increase. We re selling Advance Access disk 
boxes ($24.95 list before price increase) for 
$ 21 . 99 . Buy two or more and you can have 
them for $ 19.99 each. These are super Stor¬ 
age boxes and will hold up to 90 disks each. I 
have five of them at home. 

We ve got Pac-Man Ghost pins for $2.50. 
Super-Fan II for $59.00. Master Diagnostics 
Plus for $55.00. Mail Ordering program 
$5.00. and Verbatim disks 10/$25.99 with a 
plastic carrving case. 

STREET LIFE 

W'e now carry Street Life, as featured in 
Play Boy. We dont recommend this for 
everyone and will not sell it to you if we even 
susoect you are under thè age of twenty-one. 
Warnmg, some people may find thè theme 
and language offensive. Our price. $ 26 . 99 . 

ATARI ATARI ATARI ATARI ATARI ATARI 

Our collection of Atari games continues to 
grow. My personal favorite now is Frogger. 
Until Jan. 30 you can have this $34.95 game 
for only $ 19.94 when you purchase any 
other item. Please specify cassette or disk. 
The graphics and sound on this program are 
superb. 

Airstnke by English Software is a new 
game that has been very popular overseas. It 
only takes 16K and comes in cassette and 
disk versions. If you re bored by ordmary 
arcade-tyoe games. Airstrike will present an 
enormous challenge to you. List price is 
$39.95. Until Jan. 30 vou can have it for 
$ 29 . 94 . 

THANK YOU 

Thank you to thè many well-wishers on thè 
birth of our son, Dale. He is very healthy and 
doing well. He s learning thè computer busi¬ 
ness from thè ground up. He s by Barb s desk 
every day. I m sure many of you have heard 
him in thè background when you cali. You 
should see Barb trying to take an order over 
thè telephone, punch numbers into thè com¬ 
puter and nurse Dale, all at thè same time. 

One last item. we have a spiffy new lower 
case chip that s made for us locally. For a 
short time we are selling it for only $15.00.1 
wanted to cali it thè Buffalo Chip but I got 
out-voted. So, for $15.00 be sure to order thè 
GGH lower case chip. (Can you guess what 
GGH stands for^ì 


Great Grandma Huntington Cared 


HUNTINGTON COMPUTING 


Post Office Box 1297 
Corcoran, California 93212 


We take MasterCard, American Express or VISA (Include card # and 


B Foreign Orders 209-992-4481 
In California 800-692-4146 


Apple is a registered trademark of Apple Computer, ine expiration date). California residents add 6% tax. Include $2.00 for postage 
Per is a regisiered trademark of Commodore Foreign and hardware extra Foreign (excluding Canada) remit U.S. cur- 

A tan s a' re^ i s t e adenti a rk oT At a ri 3 inr^ rp rency, checks on U.S. banks. use listed charge cards, or make direct wire 
Atar, .s a registered trademark ofAtan, ine transfers through Secunty Pacific Bank, Corcoran. for a $6 00 charge. All 

Outside Calif. 800-344-5106 overseas orders shipped by air. Send for free catalog Pnces subject to 
' '_” ‘_change without notice 
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Applewatch 


According to thè microcomputer 
fortnightly, thè group’s demands are 
likely to get short shrift at Whitehall. 
Recently, it said, Department of In- 
dustry Under-secretary John Butcher 
told businessmen that protectionism 
was a “thing of thè past and thè UK 
must meet thè challenge from Japan/’ 

Butcher added that thè “interna- 
tional dimension is vital to our com¬ 
puter industries and only by allowing 
a flexible definition of British indus- 
try can we compete. This is an open 
market and must remain so.” 

Knocks of thè group’s demands 
didn’t come only from Whitehall, 
MicroScope reported. 

Martin Vlieland-Boddy, chairman 
of Torch Computers, slammed thè 
group’s proposals as “disgusting.” 

“I am disgusted that some of our 
competitors believe that thè only way 
they can survive is by persecuting for- 
eign products,” he told thè micro¬ 
computer newspaper. 

“They expect,” he said, to make 
their fortunes not from good products 
and aggressive marketing, but by 
closing thè door on other countries’ 
technology which, if better, should 
serve to give us all a good kick in thè 
backside.” 

Further condemnation carne from 
ACT, importers of Sirius computers 
from thè United States. Marketing 
Manager Chris Buckham called thè 
idea of an embargo “patent non- 
sense.” 

“It’s embarrassing from thè point 
of view of thè industry as a whole,” 
he observed. “If they could meet thè 
demands of thè British market, it 
might make some sense. But they’re 
not even geared to meet thè demand. 
They are damaging their own cred- 
ibility.” 

And Clive Sinclair, whose firm is a 
member of thè group, also frowned 
on thè organization’s initiatives. 

“To introduce import Controls 
now,” he said, “would be a short- 
term and potentially damaging expe- 
dient which might lead to serious re- 
taliatory action. It would not solve 
thè fundamental problems.”B 


Woz 

Retums 

Pure research will 
be Apple daddy’s 
goal while on 
board of card 
maker. 

A pple founder and US Festival 
bankroller, Steve Wozniak, has 
joined thè board of directors of Ad¬ 
vanced Logic Systems of Sunnyvale, 
CA, which designs and manufactures 
peripheral interface cards for thè 
Apple II. 

Although Wozniak won’t be an 
employee of thè firm, he will be pro- 
vided with an environment for “pure 
research.” 

Robert Ackerman, thè company’s 
marketing director, told InjoWorld 
Wozniak would be given a free rein 


to develop any land of new product 
he was interested in. 

“We have two or three ideas for 
Woz to work on, and he has some for 
us,” thè marketing director said. He 
added he hoped to interest Wozniak 
in designing for thè CP/M world. 

According to Ackerman, Wozniak 
will be provided with thè “product 
goodies he needs” for his research. 

“Woz is going to help us succeed 
thè way he has succeeded a couple of 
times before,” Ackerman said. 

He added thè Apple founder had 
made a “nice investment” in Ad¬ 
vanced Logic. 

“We feel Steve’s investment in ALS 
is a vote of confidence for thè com¬ 
pany’s future success,” President 
Dick Ribas said in a statement. “His 
technical and business experience 
will be an asset to our continued 
growth.” 

But computers aren’t thè only 
thing on thè Apple daddy’s mind. 
Wozniak, who has been studying 
computer Science at thè University of 
California at Berkeley, has recently 
announced plans for more music 
festivals along thè lines of thè US 
Festival held last fall in San Bernar¬ 
dino, CA. ■ 


Charles S. Mauro Jr. (loft) welcomes Steve Wozniak to board of Advanced Logic Systems. 
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Apple IP 16K RAM 


49 95 


Compatible with Apple Language Card, Z-80 Soft- 
card, Fortran, Pascal and CP/M. Assembled, tested 
and burned-in. With complete instructions and 
schematics. 90 day warranty. 


C.B.E. 


3375 Woodward Avenue 
Santa Clara, California 95050 
408/988-4408 


We accept VISA and MasterCard. 
Dealer inquires invited. 


5% FLOPPY BOX 
$21.95 or 2/$37.50 


As shown on our drive above. 


PRINTER PEDESTAL I 
80 column — $24.95 
PRINTER PEDESTAL II 
132 column — $47.50 


COLOR MONITORS 

RGB and Composite Video inputs. 
High-Resolution Graphics Capability. 

Open Frame (OEM Style) 

Enclosed Units 

RGB-Host Adapters 

Composite-Host Adapters 

Cali for prices! 


Amber or Green 

COMPOSITE VIDEO MONITORS 

HIGH-RESOLUTION - 20 Mhz 

GREEN 9" $129.00 12" $139.95 
AMBER 9" $149.00 12" $169.95 


APPLE 

SYSTEM SHELF 
$37.50 


225 °° 


5%" APPLE COMPATIBLE DISK DRIVE 
Shugart SA-390 Mechanism 

Compatible with Apple Language Card, Z-80 Soft- 
card, Fortran, Pascal and CP/M. Matching Apple 
color case and cable. 90 day warranty. 


AH accessorles are color-coordinated to Apple computers. 
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CP/M 


CP/M 

A 


Plus— 

First Look 


Digital Research presenta an enhanced version 
of its popolar and versatile operating System. 


by John Davidson 


r ick your rut carefully. You’ll be in 
it for two miles.” That’s a sign 
once seen on a back Vermont road dur- 
ing mud season. Computer operating 
systems aie like that. More often than 
not, your operating Systran dictates thè 
programming available to you, and it’s 
downright painful to change after you 
have hundreds of dollars invested in 
applications programs that are com- 
fortable old friends. 

The Apple II owner running CP/M 
from Digital Research, however, has 
his eggs in two baskets—Apple DOS 
and CP/M. The Apple material can be 
used with other Apples, but his CP/M 
files will follow him anywhere, even, 
God forbid, should he go out and buy 
an IBM Personal Computer. 

Because of thè intricate interface be- 
tween application program and oper¬ 
ating Systran, thè thought of changing 
systems and then either abandoning 
or revising thè entire program li¬ 
brary usually strikes terror into thè 
heart of thè most stalwart computer 
owner. If you are presently running 
CP/M (Version 2.2), no such trauma 
awaits in thè upgrade to CP/M Plus. 
All your programs running under 
CP/M will go on thè Plus without 
change, and you will enjoy many im- 
provements and enhancements. 

Doublé Plus 

There are two configura tions of 
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CP/M Plus (actually CP/M 3.0): banked 
RAM and non-banked RAM. The se- 
lection is made at initial installation 
(often by your vendor), but with some 
effort it can be changed later in thè 
field. Banking refers to thè fact that 
thè norma! 16-bit address bus can only 
access 65536 (64K) locations. For more 
than 64K of memory you can either go 
to an extended (more than 16-bit) 
address bus or you can use banldng— 
several 64K memory boards in paral- 
lel, selecting thè one you want by en- 
ables and disables issued through an 
input-output port. CP/M Plus can, in 
thè banked mode, manage as many as 
16 sudi boards at a time, for a total of a 
megabyte of on-line Storage. Cray and 
IBM, take noticel 

Of oourse, for thè average Apple 
owner that means buying more mem¬ 
ory and hardware—in thè banked 
mode CP/M Plus needs a minimum of 
94Kof RAM online. Butyoureallydid 
want to expand anyway, didn’t you? 
The non-banked configuration needs 
only thè normal 64K, and, when you 
pile thè pennies for thè extra hard¬ 
ware, thè change can stili be made. 

Disk Storage capability is up. The 


John Davidson is a Professional Engineer. He 
has been workmg with microcomputers stnce 
1975. Address correspondenee to Mm in Mar- 
low, NH 03456. 


maximum number of drives remains at 
16 (that’s nearly gone infinite 
anyway), but capacity is now 512 
megabytes per drive (more than half a 
billion!) versus 8 M with 2.2. Maxi¬ 
mum file size is noW 32 M compared to 
8 M with CP/M 2.2. 

Disk handling has been impròved. A 
hashing scheme speeds directory look- 
up during file accessing, and CP/M 
Plus will also read or write more than 
one sector at a time. Fewer trips to thè 
trough (disk) makes for much faster 
operation. Once you are on thè disk, 
thè incrementai time to access addi- 
tional sectors will be much less than 
thè time to do an entire disk read or 
write operation. As a bonus, there will 
be less wear on all diose valuable little 
parts in your disk drives. 

Better yet, if you are using thè 
banked option mentioned earlier, 
CP/M Plus offers “Least Recendy 
Used” (LRU) record buffering. Sup¬ 
pose you are running a Data Base 
Management System (DBMS) pro¬ 
gram that is rummaging around in 
data files. Under CP/M 2.2, each rec¬ 
ord access required a read of that rec¬ 
ord from thè disk (much clanldng and 
grinding). CP/M Plus, on thè other 
hand, saves a number of these records 
in otherwise unused memory (record 
buffers). When thè program asks for a 
record, Plus checks its b uff ras before 
doing thè disk read (taking micio- 




Explore thè Frontiere of Intelligence 



◄ Variations of blind-fold play-camouflaged or invisible pieces 

◄ Inveri board to play black on bottom 

◄ Change pieces on board during game, or set up position 

◄ Change between 15 levels of play, plus postai and mate-finder modes 

◄ Show move fhat Chess is thinking about 

◄ List played moves for each side 

◄ Lines of force in: attacks and defenses on a square 

◄ Lines of force out: squares attacked and defended 

◄ Chess suggests a move 

◄ Show moves Chess thinks you will make, and its responses 

◄ Evaluation of a position 

◄ Return to board orswitch to command menu 

◄ Take back a move (repeatable) 

◄ Play move suggested by look-ahead search 

◄ Chess plays neither side 

◄ Switch sides 

◄ Chess plays against itself—one level against another 

◄ Replay through most advanced position 

◄ Skip to most advanced position 

◄ Start new game 

◄ Leave program 

◄ Save, get, and delete games to and from disk 

All features self-documented; all choices cursor-controlled 
Screen shows "outward" and "look" features being used 


THE PEOPLE BEHIND THE PROGRAMS: 



Larry Atkin & David Siate: Authors of thè 
Northwestern University Chess 4.7 program- 
World Computer Chess Champion, 1977-1980 



Peter Frey: Northwestern University professor 
Editor: Chess Skill In Man and Machine 
One of U.S. Othello Assoc.'s top-ranked players 


Strategie Intelligence Ciosslcs in their Definitive Microcomputer Verslons 

liTìTXl BY LARRY ATKIN 

JLS X AND PETER FREY 


Ptayma by U S. Othello Associaiion Rules 




Checkers' features Black to move and win 

(From Checkers documentation) 
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"Scores" feature in Odin 



A due to thè secret of Odin: 
Black is destined to lose. 



Chess: $69.95 

930 Pitner Checkers: $49.95 

Evanston, IL 60202 Odin: $49.95 

(U.S.A.) 

Circle 157 on Reader Service card. 


See your locai software dealer, or order 
(MasterCard or Visa): 

800-323-5423 

(in Illinois, cali 312-328-7101) 


For Apple II, Apple II Plus 48K disk 
Systems, and Atari 48K disk systems. 
Odin is also available for TRS-80 Model 
1 & 3 32K disk systems. 


©1982 ODESTA 
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seconds instead of tens of millisec- 
onds). If it finds thè desired record, no 
disk access is necessary. If not, thè 
record is taken from disk and put into 
thè buffer in place of thè least recently 
used record, if no free buffer space is 
available. How much good thè LRU 
record buffering will really do you in 
terms of time saved and disk accesses 
avoided will depend on thè nature of 
your work and thè programs you are 
using, but you can bet your bottom 
dollar that, as CP/M Plus spreads, pro¬ 
gram writers will jump on this feature 
and write code capitalizing on it. 

Keyboard and Display 

Many of thè improvements of CP/M 
Plus are at thè keyboard and display. 
For example, if you have a real-time 
clock in thè System, CP/M Plus will 
sign on with thè date-time group just 
like thè big time-share mainframes. It 


will also insert thè date-time group in¬ 
to your files as, for example, date-time 
a file was created and date-time of thè 
last access. These date-time groups 
then appear in thè DIRectory listings. 
Date-time can also be “called” as a 
system function by application pro¬ 
grams. Thus, for example, if your Sys¬ 
tem had an analog to digitai converter 
and was reading and recording thè 
outputs of several temperature sensors, 
thè program could use thè function cali 
to record thè times of maximum and 
minimum or thè time Crossing a preset 
temperature. 

What happens, you ask, if you turn 
thè computer off between uses? How 
does it keep track of thè time? This is, 
of course, a hardware problem, 
beyond thè purview of programming, 
but thè answer is a combination of 
MOS (very low current drain logie) 
and a small, long-life, on-card battery. 
Think of thè $8.00 digitai wrist watch 


that runs for a year on two tiny Mer- 
cury cells. . . 

Another classy touch, a la thè big, 
BIG mainfr rme, is thè “on-line” help 
files, although you must have thè disk 
space to store them without cramping 
thè rest of thè operation. To use this 
feature, you merely type HELP fol- 
lowed by thè name of thè program that 
is giving you grief. (You must be in thè 
CP/M command mode.) A menu will 
appear giving thè names of thè various 
program features covered in thè help 
file. A single key entry then calls up 
either thè entire file, page by page, or 
just those pages you need. Another key 
entry aborts thè whole thing and 
returns you to CP/M. Help files for a 
number of common programs have 
been available for some time from thè 
CP/M Users Group and it’s good to see 
them incorporateci into CP/M. 

Those of us with ten lef t thumbs (ac- 
tually it’s really thè fault of thè key¬ 
board) will appreciate an improve- 
ment in thè handling of errors in 
keyboard commands. No longer will 
CP/M throw your.error back at you 
with a slightly saucy question mark. 
Now thè Command Control Processor 
(CCP) will prompt you in case of an 
error or missing argument. CP/M 
Plus will also accept multiple Sys¬ 
tem commands on one line. (A bit 
like Submit without having to create a 
Submit file?) 

Another big enhancement is that 
CP/M Plus will search all active disk 
drives looking for a requested file. Ver- 
sion 2.2 would look only on thè work¬ 
ing disk. Most user programs have thè 
ability to change thè logged-in disk (by 
specifying B:PROG.ASM), but if I had 
a dime for every time I forgot to put in 
thè “B:”. . . No more with Plus. 

In thè same vein, those who use thè 
USER numbers will be pleased to 
know that USER 0 (that’s a zero) is 
now public. No longer a disk filled 
with PIP.COMs, one to each user 
number! All thè User 0 files are now 
available to any user number. 

A reai temper saver is thè automatic 
log-in of a disk changed during opera¬ 
tion. CP/M 2.2 responds to sneaky disk 
changes without a control-C with ei¬ 
ther hurt messages or total indigestion. 
The Plus version will take it all in 
stride. 
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Before you’re 
tempted by 
thè Apple... 


look at 
thè new 
Franklin 
ACE 1000! 


FRANKLIN 


Totally Apple compatible, thè new Franklin 
ACE 1000 Computer includes 64K Visicalc con¬ 
trol keys, numeric keypad, and built-in cooling 
fan. It will interface with all Apple programs. The 
only thing they don’t have in common is their price! 

The ACE 1000 is priced hundreds of dollars less. 

Computer Discount sells thè complete Franklin, TRS-80, ATARI, and 
Apple Computer lines, Epson, Okidata, and C. itoti printers, and a com¬ 
plete inventory of hardware, accessories and software, and we have cables 
to interface our printers with Commodore, IBM and Osborne computers — 
all at thè best prices in thè U.S.A. Send for pur FREE 32 page catalog. 



CALLT0LL FREE: 800-526-5313 

COMPUTER DISCOUNT 0F AMERICA, INC. 
15 Marshall Hill Road.West Milford Mail 
West Milford, New Jersey 07480-219 
In New Jersey Cali 201-728-8080 
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“As thè most widely used operatili# System In 
microprocessor history, CP/M has been subjected 
to a great deal of embroidery and embellishment. ’ ’ 


Added Utilities 

A number of Utilities are included 
with CP/M Plus: 

• DEVICE sets communication pro- 
tocols and baud rates for character I/O 
devices. It also allows you to change 
device assignments and to assign pro¬ 
gram output to several devices. 

• GET redirects console input to be 
read from a disk file. The input file 
can contain both standard CP/M Plus 
input and input to thè application 
program. 

• PUT complements GET by allow- 
ing application program and CP/M 
Plus System outputs to be directed to a 
disk file. 

• SET allows you to set various file at- 
tributes and thè date-time recording 
model File attributes include read- 
only and System (invisible to thè direc¬ 
tory command). 

• SETDEF displays and defines thè 
disk search order, With this command 
you can ask CP/M Plus to search more 
than one disk drive for a command file. 

• SHOW displays infòrmation about 
thè characteristics of a logicai drive, 
such as capacity, number of direc¬ 
tory entries and directory label 
information. 

• SUBMIT lets you execute a com¬ 
mand file sequence stored in a disk file. 
The file may contain both CP/M Plus 
System input and application program 
input. 

CP/M Plus also offers thè serious 
programmer a number of new “bells 
and whistles” at thè application pro¬ 
gram interface. For example, your 
program can now trap System errore, it 
can ask CP/M Plus how much free 
space is available on thè disk (with thè 
old CP/M everything was roses until 
“disk full” clobbered you from behind, 
as it were), and several more program 
and I/O handling routines are avail¬ 
able as direct System function calls. 

As thè most widely used operating 
System in microprocessing history (all 
eight or nine years of it), CP/M has 
been subjected to a great deal of em¬ 
broidery and embellishment, private- 
ly, through a number of small vendors, 
among various usere* groups and in 


many magazine articles. Some of these 
modifications and add-ons are great; 
othere aren’t. All thè good ones seem to 
have been included in thè revision. 
Thus, many of thè “Plusses” of CP/M 
Plus aren’t completely new, but now 
they have been tested, recoded as nec- 
essary and integrated into thè System, 
hearing thè imprimatur of thè maker, 
an unquestioned leader in thè field. 

So, where is CP/M Plus, how do you 
get it, and what will it cost? For thè 
avid glutton for punishment, CP/M 
Plus is available from Digital Re¬ 
search, right now, in an OEM (origi¬ 
nai equipment manufacturer) package 
with many nice Utilities (MAC, SID 
and more) for $350. You will have 
to instali it yourself, a job comparable 
to putting a Pinto engine into your 
Volkswagen. 

The better way (much less painful) 
is to obtain it from thè originai supplier 
of your CP/M 2.2. By thè time this ap- 


peare in print, most suppliere will have 
gotten thè Plus going on their ma- 
chines. The cost for thè updateis set by 
thè vendor, but Digital Research is 
hoping that they will be passing it on 
cheap—possibly free, or at a cost cal- 
culated to cover just thè new disk and 
thè handling. In any case, it should be 
well worth thè price. ■ 


Pertinent names and addresses: 
Digital Research 
160 Central Ave. 

Pacific Grove, CA 93950 

SIG/M User Group 
Amateur Computer Group of New 
Jersey Ine. 

PO Box 97 
Iselin, NJ 08830 

CP/M Users Group (CPMUG) 

1651 Third Ave. 

New York, NY 10028 
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70 NC0ME1AX PR0GRAMS 

(For Filing by Aprii 15,1983) 

For APPLE ll/ll* (DOS 3.3,16-Sector) 


FEATURES :— 

1. MenuDriven. 

2. 70+ Tax Programs. 

3. Basic; Untocked; Listable. 

4. Name/SS No./FS carried 
over 

5. Inputs can be checked. 

6. inputs can be changed ' 

7.1.R.S. approved REVPR0C 
format. 

8. Prints entire Form/Scheduie. 

9. Calcuiates Taxes, etc. 

10. In 3.3 DOS, 16-Sector 

11. Fast calculations. 

12. Use GREENBAR in triplicate 
— don't change paper all 
season! 

13. 0ur4th Year in Tax 
Programs. 

14. We back up our Programsf 


Helpful programs to calculate and print thè many Tax 
Forms and Schedules. Ideal for thè Tax Preparer, 
C.P.A. and Individuate. For just $24.75 per disk, post- 
paid (in 3.3 DOS; 16-Sector disics). 

Programs are designed for easy-use, with check- 
points to correct parts as needed. Resulto on screen 
for checking before printing. 

In all, there are more than 70 individuai Tax Programs. 
These include Form 1040, 1040A, 1040EZ, 1120, 
1120S, 1041 and 1065. Also Schedules A, B, C, D, E, 

F, G, R, RP and SE. And, Forms 1116, 2106, 2119. 
2210, 2440, 3468, 3903, 4255, 4562, 4797, 4835. 
4972, 5695, 6251 and 6252. 

And, we have a disk we cali “THE TAX PREPARERÀ 
HELPER” which has programs for INCÒME STATE- 
MENTS, RENTAL STATEMENTS, SUPPORTING STATE- 
MENTS, IRA, ACRS, 104(VES. ADD W-2’s and PRINT 
W-2’s. 

TRY ONE DISK AND SEE FOR YOURSELF. 0NLY $24.75 
POSTPAI D. 

First disk is AP#1, and includes Form 1040 and 
Schedules A, B, C, D and G. $24.75 P0STRAID. 



Write:— 

GOOTH TAX PROGRAMS 

931 So. Bemiston • St. Louis, Mo. 63105 



Febraary 1983 Èidcr 29 




Graphics 


Keyboard— 
Graphics 


Your Apple can become a dynamic sketch pad, 
without thè usuai extras. 


H ave you ever wondered why it’s 
necessary to have paddles or a 
graphics tablet to turn thè Apple into 
a dynamic sketch pad? In fact, it’s not 
necessary at all. By using thè program 
in thè listing, you will be able to use 
certain keys not only to draw but to 
move to another point on thè screen or 
to erase what you have drawn. 

The program uses both thè primary 
and secondary pages of thè high-reso- 
lution graphics, so an Apple with at 
least 24 K bytes of memory is required. 
The program lets you create dynamic 
effects by switching between thè two 
screen s. 

As outlined in thè Apple Reference 
Marmai , eight special memory loca- 
tions control thè setting of thè soft 
switches for thè screen. This program 
uses three of those switches. In line 305 
a switch is used together with thè HGR 
command so that thè whole screen can 
be drawn on, instead of leaving four 
lines available for text. Line 405 uses 
thè switch to display thè primary page 
and line 410 employs thè switch to dis¬ 
play thè secondary page. 

When you enter thè program, you 
will be in Draw mode and thè color 
will be set to white (lines 100-120). 
Line 180 allows you to select any of 
thè standard high-resolution colors 

Address correspondence to Maria DeMarco , 641 
Bathgate Drive , Apt. 210 , Ottawa , Ontario 
K1K 3Y3. 
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Program listing. Animated high-resolution graphics program. 


REM DRAW AND SWAP PROGRAM 

GOSUB 2000: REM INITIALIZE CURSOR 

HOME : PRINT 

PRINT "******** DRAW AND SWAP SCREENS *»*****#" 
PRINT 

PRINT "THE PROGRAM ALLOWS YOIJ TO DRAW COLORED" 
PRINT "PICTURES BY CONNECTING STRAIGHT LINES" 
PRINT "AND TO MOVE TO ANOTHER POINT ON THE" 
PRINT "SCREEN BY SWITCHING TO MOVING MODE." 
PRINT : PRINT "BLACK CAN ALSO BE USED TO ERASE.' 
VTAB 20: PRINT "PRESS ANY KEY TO CONTINUE GE 

HOME : PRINT 

PRINT "THE FOLLOWING KEYS ARE USED FOR" 

PRINT "SPECIAL FUNCTIONS IN THE PROGRAM:": PRIN1 
PRINT "’S’ : SWITCH BETWEEN DRAWING/MOVE MODE" 

PRINT "'E’ : END OF PICTURE" 

PRINT " ? D’ : MOVING DOWN FIVE" 

PRINT "’L’ : MOVING LEFT FIVE" 

PRINT M, R’ : MOVING RIGHT FIVE" 

PRINT : PRINT "THE REPEAT KEY CAN BE USED" 

PRINT "IN COMBINATION WITH D,U,L AND R" 

PRINT "FOR FAST DRAWING OR ERASING. ** 

PRINT : PRINT "ENTER NUMBER 0-7 TO SELECT" 

PRINT "FROM HIGH-RES COLOURS" 

VTAB 20: PRINT "PRESS ANY KEY TO CONTINUE ";: GE 
HOME : PRINT 

PRINT "PLEASE GlVE STARTING X AND Y" 

PRINT "FOR EACH OF THE TWO PICTURES WHICH" 

PRINT "YOU WILL BE DRAWING ON THE" 

PRINT "TWO HIGH-RESOLUTION GRAPHICS SCREENS" 


INPUT "STARTING XI AND Y1 ";X1,Y1 
INPUT "STARTING X2 AND Y2 ";X2,Y2 
GOTO 300 

REM SUBRT TO SWITCH BETWEEN 
REM DRAWING AND MOVING MODE 
IF FL = 0 THEN FL = 1 : RETURN 
IF FL = 1 THEN FL = 0: RETURN 
REM SUBROUTINE TO DRAW ON 
REM EACH OF THE 2 SCREENS 
REM INITIALIZE COLOR 
REM TO WHITE 
HC = 3 
HCOLOR= HC 

REM INITIALIZE FLAG TO 0 
FL = 0 
HPLOT X,Y 


Listing continued. 







Listing continued. 



128 

REM 

CURSOR XOR WITH SCREEN 



130 

XDRAW 

1 AT X,Y: GET P$: XDRAW 1 AT X,Y 



140 

IF <P* 

= "S") THEN GOSUB 80: GOTO 130 



150 

IF <P* 

= "D") AND (Y < = 186) THEN Y = Y 

+ 5 


155 

IF <P4 

= "U") AND (Y > = 5) THEN Y = Y - 

5 


160 

IF <P* 

* “L"> AND (X > = 5) THEN X = X - 

5 


165 

IF <P* 

= “R") AND (X < = 274) THEN X = X 

+■ 5 


170 

IF P* 

= "E" THEN RETURN 



180 

IF ASC <P$> > 47 AND ASC (P*) < 56 THEN 

HC = 

VAL <P*>: HCQLOR= HC: 


GOTO 

130 



190 

IF FL 

= 1 THEN GOTO 130 



200 

HPLQT 

TO X, Y 



205 

GOTO 1 

30 



300 

REM 

SET PRIMARY SCREEN WITH 



302 

REM 

ALL GRAPHICS 



305 

HGR : 

POKE - 16302,0 



307 X 

= XI: 

Y - Y1 



310 

GOSUB 

100 



315 

REM 

SET SECONDARY SCREEN 



320 

HGR2 




325 X 

« X2 : 

Y = Y2 



330 

GOSUB 

100 



400 

REM 

DYNAMIC SCREEN SWAPPING 



402 

REM 

AD INFINITUM 



405 

POKE 

- 16300,0 



408 

FOR I 

= 1 TO 1000: NEXT 



410 

POKE 

- 16299,0 



418 

FOR I 

= 1 TO 1000: NEXT 



430 

GOTO 405 



1998 

REM 

SUBRT TO CREATE A 



1999 

REM 

CURSOR SHAPE TABLE 



2000 

POKE 

7676,1: POKE 7677,0: POKE 7678,4: POKE 7679,0 I 

2010 

POKE 

7680,18: POKE 7681,63: POKE 7682,32 

POKE 

7683,100 

2020 

POKE 

7684,45: POKE 7685,21: POKE 7686,54 

POKE 

7687,30 

2030 

POKE 

7688,7: POKE 7689,32 



2032 

POKE 

7690,0 



2040 

POKE 

115,252: POKE 116,29 



2050 

POKE 

232,252: POKE 233,29 



2060 

SCALE 

= 1: ROT = 0 



2090 

RETURN 



9000 

END 




3PR#0 





from 0-7 by entering thè desired 
number on thè keyboard. Pressing thè 
S key will allow you to move thè cur- 
sor without drawing. When you press 
S again to switch back to Draw mode, 
you will be drawing in thè last color 
you selected. 

I have inserted a pause into thè pro¬ 
gram by means of an empty loop, to 
slow down thè screen swapping: 

408 FOR I = 1 TO 10000: NEXT 
418 FOR 1 = 1 TO 10000: NEXT 

Alternatively, you could slow down 
each switch by a different pause dura- 
tion, or slow only one of thè switches. 

Subroutine 2000, which creates a 
shape table defining thè cursor, is used 
only once, at thè beginning of thè exe- 
cution of thè program. XDRAW (line 
130) does an “exclusive or” between 
thè cursor created in thè shape table 
and thè screen. This allows thè cursor 
to be drawn and undrawn without 
erasing thè background. ■ 
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Cali (800) 847-4176For Protection! 


• Apple 

• Atari 

• AVL 

• Bell & 
Howell 


• Centronics 


• Commodore 



Aluminum 
hipping Case 


Removable Cover 

$215.50* 


Polyplex 1 
Heavy-Duty | 
Carrying Case !| 

$142.50* I 




• Epson 

• IBM 


Hewlett-Packard 


Apple II cases j 

holding 2 | 

disk drives 

Aluminum 
Shipping Case 

$216.50* 


ABS Storage 
& Carrying Case 

with 

Removable Cover 

$69.50* 


*UPS Shipping Included. 



Cali for Complete Computer Case Catalog. 
Credit Card Customers Cali Toll Free 


• NEC 

• Radio- 
Shack 

• Sanyo 

• TRS-80 

• Xerox 

• Zenith 

• Texas 
Instruments 


Fiberbilt 

Ikelheimer-Ernst, Ine. 

601 West 26th Street 

New York, New York 10001-1199 

(212) 675-5820 (N.Y.C. area) 
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Pascal 


Pascal Primer 


This first in a series of Pascal 
programming tntorìals will help yon get started. 


T he UCSD (University of Cali¬ 
fornia at San Diego) p-System is 
a complete operating and developing 
environment. Necessary tools and Util¬ 
ities are provided. The selection of sin- 
gle-keystroke options from hierar- 
chical command lines at thè top of thè 
CRT allows easy movement from one 
part of thè System to another. Most 
impressive is thè full screen-oriented 
editor with its parameters for program 
or document preparation. 

The “p” in p-System stands for 
“pseudo.” The p-System environment 
is not limited to Pascal, although Pas¬ 
cal is its primary language. Compilers 
are programs that process other pro- 
grams written in source languages, 
such as Pascal, Fortran or Basic, into 
thè object or machine code of a specific 
processor chip. The p-System com¬ 
pilers produce code that runs on a 
pseudo (idealized) processor. During 
execution of thè code on an Apple II, 
another program, called an inter- 
preter, translates thè idealized chip 
instructions into reai 6502 instruc- 
tions. The 6502 processor is thè heart 
of thè Apple. 

The compiled/ interpreted architec- 
ture has certain effects. Execution of 
thè same p-code on a microcomputer 


Address correspondence to John C. Stephen- 
«m, 9118 Smith Ave., North Bergen , NJ 
07047. 

32 feider February 1983 


by John Stephenson 


that has a different processor than thè 
Apple’s requires only a change in thè 
interpreter. Armed with interpreters 
for popular processor chips such as thè 
Z-80, 8080, 8088, 8086, 6502 and 
68000, one could execute thè same 
p-code on any microcomputer that 
uses these chips. Such hardware inde- 
pendence increases thè availability of 
software products—good news for 
programmers and users. In addition, 
execution speed is substantially in- 
creased since thè idealized p-machine 
instructions can be more efficiently 
interpreted than Applesoft instructions. 

First Impressions 

Most Apple computer owners are fa- 
miliar, to some degree, with Applesoft 
Basic. Some have written programs 
beyond what was thought possible in 
that language. Upon first experiencing 
Pascal, it is naturai for Apple owners to 
compare it with Applesoft. Here are 
some observations. 

Giving procedures meaningful 
names, such as “CompressBuffer” or 
“SortList,” rather than Basic’s style of 
GOTO 3110 or GOSUB 515, Controls 
logicai flow inside a Pascal program. 
Line numbers are not found in Pascal 
programs. Gotos are not usually found 
in Pascal programs since Gotos need 
line numbers. 

The many data constructs in Pascal 
clarify and enrich program expression. 


Unlike Applesoft, things can be de- 
scribed to thè computer in terms closer 
to how thè things are perceived by peo- 
ple. For example: 

weekdays = (monday, tuesday, wednesday, 
thursday, friday); 

suite - (clubs, diamonds, hearts, spades); 

But Pascal source must first be pro- 
cessed by thè Pascal compiler (itself a 
Pascal program), as contrasted to Ap- 
plesoft’s straightforward Run com¬ 
mand. The compiler outputs a “.code” 
file based upon thè input “.text” file. 
The compilers merciless insistence on 
perfection plagues poor typists and 
those unsure of proper Pascal syntax. 
Consequently, using Pascal for com- 
posing short or throw-away programs 
can be tedious; Applesoft is stili best for 
these tasks. 

After a Pascal “.code” file is success- 
fully generated, it runs faster than an 
Applesoft equivalent program. The 
“.code” file occupies less disk and 
memory space than its associated 
“.text” file, andis, infact, independent 
of it. The “.text” file may (and should) 
be saved on a separate disk. The 
“.code” file stands alone for program 
execution. 

In a Nutshell 

Most Apple owners acquire Pascal 
by purchasing thè Apple Language 
System; about 20 percent of all Apple 





If yotir printer uses yotir Apple 8 

more than you do, 
you need The Bufferboard. 


If your Apple is locked into thè “PRINT” 
mode so much that you Ve taken up soli- 
taire to kill thè boredom, you need a 
buffer. And if your computer is thè Apple 
II or III, thè only buffer for you is The 
Bufferboard. Expandable to 64K of Stor¬ 
age, The Bufferboard Stores an instantane- 
ous bucketful of print data from your 
computer. Then it feeds thè data to your 
printer at its own printing rate. Your Apple 
is set free from driving your printer and is 
ready for more data from you. 



Talee yotir existing interface— 
and buffer it! 

Only The Bufferboard has a simple 
Interface-Docking System. No bulky boxes 


or expensive power supplies are needed 
because The Bufferboard fìts right into 
your Apple—and docks onto your existing 
printer interface. The result is convenient 



and economica! buffering of most popu- 
lar printer interfaces, including thè 
Grappler + ™ interface, Epson interface, 
and Apple printer interface. Thirty sec- 
onds and a single hook-up are all you need 
to end thè printer waiting game forever. 

Up to 20 letter-size pages 
stored at a time. 

The Bufferboard comes standard with 
16K, and is expandable to 32K or 64K of 
buffering capacity with thè addition of 


memory chips. This "bucket” will hold up 
to 20 pages of a print job, allowing you 
freedom to use your Apple. 

The Bufferboard—designed 
exclusively for thè Apple Computer. 

Specifications: 

• Versions for Grappler + interface, Epson 
interface, Apple interface, and other popu- 
lar printer interfaces • 16K buffer standard 

• Upgradeable to 32K or 64K • Automatic 
memory confìguration • Automatic self 
test • Includes interface docking cable. 

The Bufferboard is made by Orange 
Micro, Ine. ; thè same people who brought 
you thè popular Grappler + printer inter¬ 
face. Both thè Grappler + and The 
Bufferboard are now available at your 
locai Apple dealer. 

Apple is a registered trademark of Apple, Ine. 

Epson is a registered trademark of Epson America, Ine. 

^Orange miao 

1400 N. Lakeview, Anaheim, CA 92807 
(714) 630-3680, TELEX: TX 183811 CSMA 
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PASCAL VERSION 


Program Ustmg 1. 
Programs to print nanne on screen. 


owners have purchased it. The pack¬ 
age includes a language card to be in- 
stalled in slot #0, manuals, and System 
disks. Apple Computer will send up- 
dates to inforni all those who send in 
their registration cards. Become famil- 
iar with thè System by reading thè in- 
stallation booklet and thè sections in 
thè manuals about thè formatter, filer, 
editor and compiler. Use thè formatter 
to initialize disks and thè filer to back 
up your originai disks. Use thè editor to 
enter your programs and thè compiler 
to prepare programs for execution. 

A common first program is one that 
writes thè author’s name on thè screen. 
Listing 1 shows this, written in Apple¬ 
soft and in Pascal. Listing 2 shows thè 
skeletal form of a Pascal program. 
Comments between curly braces are 
remarks, analogous to Applesoft’s 
REM statement. Apple keyboards not 
able to produce thè curly braces can 
substitute “(*”and The com¬ 

ments explain thè different parts of thè 
skeleton. 

The CONST section associates Con¬ 
stant values with an easily referenced 
name. For example: 

CONST 
ASCIIBeU = 7; 

Copyright = ’(c) Copr. 1983 Chuck Wagori; 
HighBit - 128r 

The TYPE section defines thè kind of 
data thè program will operate upon. 
Pascal manipulates thè simple data 
types of Boolean, CHAR, Integer and 
Reai. A string is predefined as an array 
of characters with a length attribute. 
Other data types are created by com- 
bining thè simple types. For example, 
structures of different components are 
expressed as records: 

TYPE 

monsters = record 

name: string; 

combatRating: reai; 
condition: (dead, wounded, 

stunned, fit); 
level: integer; 

end; 

With records, things logically 
grouped together can be handled as a 
single entity. Structures defined in thè 
TYPE section are used to create vari- 
ables in thè VAR section. Using thè 
structure above, space for recalling an 
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assortment of creatures from disk may 
be allocated: 

VAR 

SwampMonsters : file of monsters; 
FlyingMonsters : file of monsters; 

And a ferocious dozen may be as- 
sembled with thè declaration: 

NastyFello ws : array [ 1.. 12] of monsters; 

All globally accessed variables are 
declared at thè top of thè program. 
Space in memory is automatically set 
aside prior to program execution. 

Support procedures and functions in 
Pascal (thè equivalent of subroutines in 
Applesoft) can operate on global vari¬ 
ables, but can also have private vari¬ 
ables. They usually communicate with 
thè rest of thè program through pa- 
rameter lists. Unfortunately, in Apple¬ 
soft, all variables are global. Private 
variables are preferable because there 
is less danger of side effects; that is, 
there is less likelihood of unintentional 
influence on another part or operation 
of thè program. Procedures operate on 
thè items passed in thè parameter list. 
Any special structures or variables 
needed to accomplish their job are in- 
visible to thè rest of thè program. Pro¬ 
cedures may cali themselves, leading 
to elegant Solutions to some difficult 
problems. 

procedure DirectHit (var Herman: monster) ; 
begin 

if (Herman, condition = dead) then 
writeln (‘You just shot a dead monster) 
else Herman.condition : » prec(Herman. 
condition); 

end; 

procedure HealMonster (var Herman:monster); 
begin 

if (Herman.condition<fit) then 

Herman, condition : - succ(Hennan. 
condition); 

end; 

In thè two procedures above thè 
programmer passes thè identity of any 
monster, who is automatically substi- 
tuted for Herman, and is either healed 
or wounded. If thè healing or wound- 
ing processes are changed later they 
may affect thè monsters differently, 
but they will not affect thè exterior 
program structure. 


program prìntname; 

{ Program to print name } 
var 

name: string; 

begin 

write (‘Type your name: '); 
rea din (name); 

writeln (‘Your name is *,name); 

end. 


BASIC VERSION 

10 REM PROGRAM TO PRINT NAME 
20 INPUT “TYPE YOUR NAME: ”;NA$ 
30 PRINT “YOUR NAME IS ”;NA$ 

40 END 


Variables may be declared ahead of 
rime, or they may be created spontane- 
ously by using pointers and a proce¬ 
dure that is part of thè operating Sys¬ 
tem called NEW. The first kind of vari- 
able is called static, and thè second 
kind is called dynamic. Dynamic vari- 
ble structures can grow or shrink in 
size during program execution and 
thus economize use of memory. 

procedure JAWS 
TYPE 

Others * A Integer; 

NewMonster = A Monster; 

begin 

Mark (Others); 

NEW (NewMonster); 

NewMonster\name: = Landjaws; 

NewMonster 7 '. condition: = fit; 
end; 

The code fragment above created 
space in memory for an additional 
monster record. The location of this 
space is remembered by calling thè op¬ 
erating System procedure MARK, and 
later reclaimed by calling thè operat¬ 
ing System procedure RELEASE. 

Another way to get thè most from 
available memory is to declare various 
procedures as segment procedures. 
This will keep procedures out of RAM 
and on thè disk while they are not in 
use. For example, a program may con- 
sist of 500K worth of procedures. As 
long as they are segmented and do not 
have to be in memory at thè same 
time, thè oversized program can run 
on thè 64K Apple II. This accounts for 
thè mysterious disk whirring in thè 
midst of some Pascal programs. It has 
special significance for those with fast 
access hard disks. 

More control statements are avail¬ 
able in Pascal than in Applesoft. The If 




Apple Users! 


Now your dollar 
can outmuscle 
three times its weight 
in cold cash. 





Your computing needs are Apple-specific. And you re stili only 
subscribing to that generai interest computer magazine? Fact is 
it would take three such publications to provide you with thè 
same amount of Apple information you’ll find in one issue of 

inCider. 

inCider promises to expand thè limits of your Apple like its 
sister publication 80 Micro has blown thè lid off thè TRS~80. 

Not just another Apple magazine—but a comprehensive 
monthly filled with... 

•programs 

•software applications 
•hardware modifìcations 
•reviews 

•new product announcements 
•advertising 
•tutorials 
•games 

Want to know thè easiest way to get thè kinks out of your 
programs? inCider will show you. Want to know which 
peripherals have thè best history and thè brightest future? in¬ 
cider will teli you. 

Want to expand your knowledge of hardware? Or become an 
expert programmer? Want to discover which word processors 
give you thè most for your money? Or how your Apple can bet~ 
ter manage your fìnancial affairs? inCider will answer these 
and many other questions each month. 

No matter what you use your Apple for—no matter where 
your machine is—you’ll want thè latest copy of inCider 
propped up beside it each month. 

You get a full year’s subscription to inCider—12 monthly 



issues for only $24.97. And if you send your money now you will 
receive a 13th issue free! 

Simply send in thè subscription coupon to: 
fcider 
P.O. Box 911 
Farmingdale, NY 11737 
or cali toll free: 

1 - 800 - 258-5473 

and start receiving more usable information about your Apple 
than you ever dreamed possible. 

Why settle for a little Apple information ffom those other 
magazines when you can get a lot ffom inCider? 

Be an inCider. Subscribe today. 


YES! I want a subscription to inCider for one year 

at $24.9 7 * Apple is a trademark of Apple Computer, Ine. 

I understand that with payment enclosed 
or credit card order I will receive a 13th 
issue FREE. 

□ Check Enclosed □ MC □ VISA □ AE □ Bill me 

Signature_ 

Card#_ 


Exp. Date. 

Name_ 

Address __ 
City_ 


Jnterbank. 


State. 


-Zip. 


Canada &. Mexico $27.97, 1 year only, US funds 
Foreign Surface $44.97 1 year only, US funds drawn on US bank 
Please aliow 6-8 weeks for delivery 332R5 

Box 91 l*Farmingdale, NY 11737 





Program Example; { Programs begin with thè key word 



"program” followed by a name. 

} 

Uses SupportUnits; { Programs may use precompiled library 



routines. 

} 

const 

{Constants declared here are globally available. 

} 

type 

{Types defined here are globally available. 

} 

var 

{Variables defined here are globally available. 

} 


procedure A (var parami:integer); 



{The first support procedure for program Example. It is passed an integer 
parameter called "parami.” It is a "var” parameter: if procedure A altere 
its value it will be changed in thè program, as well. } 


const 

{ Constants only available to procedure A. 

} 

type 

{ Types defined only for procedure A and its sub 
procedures. 

} 

var 

{ Variables defined only for procedure A and its sub 
procedures. 

} 


procedure AA; 

{ Private support code for procedure A. } 

begin 

end; 


begin 

{Implementation of procedure A with calls to AA. 

} 

end; 



procedure B 
begin 

(parameterl:Boolean; parameter2:char); 



{ Can cali procedure A, but not AA which is unknown to it. Procedure B is 
passed a Boolean and character parameter. It may change their values to ac- 
complish its own processing, perhaps to alter a program global, but any 


changes in them will not be in effect outside this procedure. 

} 


end; 


begin 

{ Main program code which calls A and B with various parametere. 

} 

end. 




Program Usting 2. 
Pascal program skeleton. 


statement may have an Else clause. A 
multi-branch If statement is handled 
by thè case construct. The For state¬ 
ment is more limited because thè step- 
ping increment must always be 1. The 
While-do and Repeat-until statements 
have no direct Applesoft equivalents. 
The While statement checks a pro- 
grammed condition and will iterate a 
series of statements as long as that con¬ 
dition is true. If thè condition is false to 
begin with, thè series of statements is 
bypassed. The Repeat statement will 
execute thè series of statements at least 
once, checking thè programmed con¬ 
dition after each iteration. The subtle 
differences between For, While and 
Repeat allow clearer definition of pro¬ 
gram flow. 

If computers could not communi- 
cate with thè outside world, they 
would be useless machines. In Pascal, 
communication is accomplished be¬ 
tween devices (such as keyboard, 
screen, printer, disk, and modem) at 
different levels, depending on thè task 
at hand. The Read and Write com- 
mands are used for character-oriented 
communication. The Seek, Get, and 
Put commands are used for record and 
random access communication. The 
BlockRead and BlockWrite commands 
are used for raw, buffered communi¬ 
cation. The UnitRead and UnitWrite 
commands are used for raw, byte- 
stream communication. 

The code fragment below might be 
used to recali some of thè monsters 
from a disk file: 

segment procedure initialize; 
var 

I : integer; 
begin 

reset (SwampMonsters, ‘*Swamp.data); 

for I: = 1 to 12 do 
begin 

seek (SwampMonsters, I); 
get (SwampMonsters); 

NastyFellows[I]: = SwampMonsters*; 
end; 

dose (SwampMonsters); 
end; 

Some History 

Niklaus Wirth, using some concepts 
already expressed in thè Algol lan- 
guage, designed generic Pascal in thè 
late I960s. He intended Pascal to be a 
teaching tool, encouraging and enforc- 
ing what he called “stepwise refine- 
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ment,” just an earlier way of saying 
“top-down design.” Wirth wanted 
Pascal to be used on as many processore 
as possible. 

In thè United States, Pascal was first 
used at thè University of California at 
San Diego on their Burroughs B6700 
batch-oriented mainframe. To adapt 
it to PDP lls and later to various mi- 
crocomputers, extensive development 
was undertaken, resulting in thè 
p-operating system, editor, filehan- 
dler, librarian, and other tools. The 
UCSD development team added ex- 
tensions to thè originai language in- 
cluding string handling and floppy 
disk accessing. This led, in thè late 70s, 
to UCSD Pascal LO. 

UCSD granted various individuals 
and groups, including Apple Comput¬ 
er, licenses to distribute their system. 


For a nominai charge thè entire source 
was available, and hacking was en- 
couraged. Soon, however, thè Univer¬ 
sity s tax exempt status carne into ques- 
tion since they were alleged to have 
entered thè software business. In self- 
defense or, possibly, abject fear, 
UCSD abruptly cancelled all licenses 
to distribute their system. They tumed 
thè whole package over to Softech Mi¬ 
crosystems, which agreed to support its 
continued professional development, 
and thus protected thè University's tax 
exempt status. 

However, unlike other contracts, 
Apples license contained a non-can- 
cellation clause. Some people at Apple 
Computer saw thè value in Pascal 
and planned to forge ahead with it on 
their own. 

Apple Computer released Apple 



“Compared to Apple’s other 
documentation of award-winning quality, 
thè infamous ‘white hook’ was shocking.” 


Pascal version LO in 1979. Although it 
was a delight to hard core Apple own- 
ers, it was full of bugs and poorly doc- 
umented. Compared to Apple’s other 
documentation of award-winning 
quality, thè infamous Pascal “white 
hook” was shocking. During thè next 
year Apple Computer suffered com- 
plaints and criticisms from their first 
Pascal users. Meanwhile they quietly 
fixed thè bugs and revised and expand- 
ed manuals. Apple Pascal version 1.1 
was thè result—a totally professional 
Pascal System that became thè stan¬ 
dard for 8-bit machines. 

As Apple was developing its Pascal 
System, Western Digital produced 
their MicroEngine, which had thè 
p-machine burned into ROM. Since 
interpretation was bypassed, code files 
were executed quickly. Western Digi¬ 
tal also introduced concurrent pro- 
cesses in their machine, but were 
unfortunately haunted by stories of 
unreliability. 

Meanwhile, Softech Microsystems 
(thè firm charged with safeguarding 
Pascali continued professional devel- 
opment), was working on version 
IV.0. They had released some version 
II.O systems to run on CP/M machines, 
but thè results were less than satisfying 
to their customers. With thè release of 
version IV.O, nearly complete source 
level compatibility was maintained 
with previous versions while a new 


and sophisticated runtime architecture 
was introduced. Though larger and 
slower than Apple Pascal 1.1 on 8-bit 
systems, version IV.O works well. It is 
well suited to thè high performance 
16-bit systems and offers stili more 
professional features. 

Softech’s version IV.O is available 
for thè Apple II and is up and running 
on an impressive selection of micro- 
computers. By thè time this article is 
published, Softech Microsystems will 
probably have completed enhance- 
ments currently in production, and 
will have upgraded to version IV. 1. It 
is also rumored that Apple Computer 
has their own upgrade in thè works. 
They have also released Apple III Pas¬ 
cal, with some impressive features. ■ 
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Add a BTA smart multiport controller to your C.P.U. 

"K" The MODEL 524 expands a single RS232 port to four 
individuai ports with port selection and baud rate 
controlled by user software. 

Buffered inputs permit simultaneous operation in- 
creasing data exchange rate. 

62K spooler model also available. 


Price 

$249.00 


Bay Technical Associates 

P. O. Box 387, Bay St. Louis, MS. 39520 
601 -467-8231 


Circle 54 on Reader Service card. 
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-Reviews- 

Apple-Mate,— 

Friend or Foe? 


Thìnkìng of purchasing an Apple compatìble drive, 
but don’t know which one is best? Here’s one 
review that might aid in your final decision. 


T he Quentin Research Corpora¬ 
tion is offering a plug-compat- 
ible drive for thè Apple, called thè 
“Apple-Mate.” I was attracted by thè 
price of $335 each, considerably less 
than thè $545 Apple wants for their 
second drive. Also, thè drive can half- 
track, an Apple drive feature used by 
many software protection schemes. 
Quentin drives are advertised as com- 
patible with thè standard Apple Disk 
II interface card, and 40-track opera- 
tion is possible. 

After using two Quentin drives for 
a few days, I must say I was disap- 
pointed. I was getting those dreaded 
DISK I/O ERROR messages. Was 
there a worm in thè drives? 

I gathered them up and headed for 
my testing lab at thè locai Apple deal- 
ership, where thè dealer has been 
kind enough to let me use his facilities 
whenever I have a problem. He ex- 
udes great glee when any of my non- 
Apple equipment starts to hiccup and 
was not disappointed this time either. 
He even had a suggestion for a 
cure—buy a Disk IL 

The first test was to try some game 
software. Several packages would not 
load, and one program would load on 


Address correspondence to Lee E. Sumner, Jr., 
75 E. King St., Dallastown, PA 17313. 
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by Lee E. Sumner, Jr. 


one drive but not thè other. With an 
Apple drive there was no problem. 

Next I tried Muffin and disk verify 
using FI. I got a disk I/O error on 
about 40 percent of thè standard Ap¬ 
ple disks I tried. In all cases these same 
disks could be verified by thè Apple II 
standard drive. 


“Was there a worm 
in thè drives?’’ 


I cleaned thè heads and checked thè 
speed, but another try gave thè same 
results. Then I took a look at thè boxes 
in which thè drives were shipped. 

The styrofoam that held thè drives 
in place had broken out of thè boxes. 
The drives had probably sustained a 
heavy blow that disrupted thè me- 
chanical alignment. 

At this point I checked thè fine 
print in thè warranty and was sur- 
prised to find no terms or condi- 
tions stated. In a cold sweat I called 
Quentin to see if I had bought a pig in 
a poke. 

[According to thè manufacturer, ef¬ 
fettive December 15,1982, packaging 
technique of all Quentin products, in- 
cluding Apple-Mate, has been modi- 
fied to reduce risk of damage during 
shipment. In addition, thè terms and 


conditions of thè warranty will be 
more precisely defined in user man- 
uals. — eds.] 

They assured me there was a one- 
year parts and labor warranty on thè 
drives. I should send them back for re- 
pair. Yes, they had had some shipping 
damage problems with their packag¬ 
ing. So I boxed up thè drives in what 
was left of thè packaging and sent 
them off. 

A week later I was surprised to re- 
ceive two new drives in thè mail. Tve 
tried all thè same tests and software 
packages that gave thè previous drives 
trouble. The new drives have behaved 
perfectly—even with very heavy use. 

The unit appearance is very dose to 
thè Disk IL The only difference is thè 
Quentin label. Also, there is no way to 
ground thè shield on thè attached 
cable at thè computer end. 

A neat mechanical lock prevents 
closing thè door until thè disk is all thè 
way in—a good feature to have 
around hurried kids and Dads. The 
drive is based on a Siemens unit that 
uses a lead screen head positioner. 
The noise level is very low—a satisfy- 
ing “whirrr” when in use. 

The instructions consist of two pho- 
tocopied sheets that teli you how to 
connect thè drive to thè interface 
card. Quentin provides three patches 
to DOS 3.3 that allow 40-track opera- 
tion. The extra five tracks give you 80 





WHAT ARE YOU WAITING FOR ? ? ? 


more sectors in a disk. These patches 
make FID return thè correct free 
space for 40 tracks. However, be care- 
ful. The patched DOS does not check 
for 35- or 40-track disks, and you must 
never write to a 35-track disk with 
this patched DOS in memory. 

I have some experience with Micro- 
Sci 40-track drives. They provide a 
patch that looks at thè disk before it is 
written to and keeps track of how 
many tracks are on thè disk. I tried 
thè Micro-Sci modified DOS and it 
worked fine with thè Quentin drives. 

The Quentin drive is a possible sub- 
stitute for thè Apple Disk II. The unit 
is well made and works. However, 
packaging is also part of thè product. 
Quentin says they are trying to get out 
of thè mail-order business and sell on- 
ly through dealers. If you can get it 
that way, thè Apple-Mate drive is a 
bargain. ■ 


Are you tired of waiting for DOS to 
load and save files? Are you tired of 
waiting for DOS to finish so you can 
type again? Are you tired of waiting 
for your printer? When you buy 
Diversi-DOS™, you won’t have to 
wait any more! Here’s why: 

1. DOS speed-up: Appiè DOS 3.3 
takes 18 disk revolutions to read a 
single track, whereas Diversi-DOS 
reads or writes a track in just 2 
revolutions. This speeds up file pro¬ 
cessing tremendously (see table). 

2. Keyboard Buffer: Diversi-DOS 
allows you to type at any time, as 
fast as you can, without missing a 
single character. 



APPLE DOS 

DIVERSI-DOS 

SAVEt 

27.1 sec. 

5.9 sec. 

LOAD % 

19.2 sec. 

4.5 sec. 

BSAVE* 

13.6 sec. 

4.1 sec. 

BLOAD* 

9.5 sec. 

2.6 sec. 

READ** 

42.2 sec. 

12.4 sec. 

WRITE** 

44.6 sec. 

14.9 sec. 


* Hi-res se reen X 80-sector BASIC program 

** 52-sector random accesa text file 


3. Print Buffer: Diversi-DOS can use 
a RAM card (16K-128K) to temporari- 
ly save characters before they are 
printed. Thus, your computer won’t 
have to wait for your printer to 
finish. 

Diversi-DOS, thè TRIPLE utility, re- 
quires a 48K Apple II or 11+ with 
DOS 3.3. A simple, menu-driven in- 
stallation program is included on 
thè un-protected disk. So what are 
you waiting for? 

Send $30 to: 

Diversified Software Research, ine. 
5848 Crampton Ct. 

Rookford, IL61111 
(815)877-1343 

Visa/Mastercard accepted 
Illinois residents add 5% sales tax. 

Apple is a registered TM of Apple Computer, Ine. 


te 
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Review 


_A Drive 

of a 

(slightly) 


Different Color 


Everything costs something—decide for yourself whether 
Micro-Sci’s A-40 disk System will meet your needs. 


by Lee E. Sumner, Jr. 


A number of aftermarket disk Sys¬ 
tems are popping up as an alter¬ 
native to thè drives sold by Apple. I 
saw advertisements for thè Micro-Sci 
A-40 drive and controller about $200 
cheaper (from a discount house) than 
thè Apple drive and controller. List 
prices from Micro-Sci are: $549 with 
controller for thè 40 track A-40, and 
$699 for thè 70 track A-70. The A-40 
and A-70 bare drives are $449 and 
$599, respectively. Many mail-order 
houses offer thè System at a consider¬ 
ale discount. I bit, and bought an 
A-40 drive and controller. 

The drive and controller arrived in 
a sturdy foam box, well protected. 
The manual gives step by step instruc- 
tions for installing thè controller and 
drive. 

The controller card has a jumper 
with three settings. One is for a self 
test done before connecting thè drive 
to thè controller card. When thè Ap¬ 
ple is turned on and an IN#6 com- 
mand given, a message prints on thè 
screen signifying thè controller card is 
OK. The manual offers a trouble- 
shooting guide in case you run into 
problems. I had none at all. I did have 
some questions that were answered 
promptly in a phone cali to Micro-Sci. 
They support what they sell. 

The other two positions of thè 
jumper select thè DOS (Disk Operat- 
ing System) of your choice. Apple has 
two in common use, DOS 3.2 and 
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DOS 3.3. You can attach a switch to 
thè jumper pins and switch between 
thè operating Systems. 

Micro-Sci does not supply thè DOS. 
The manual says you must obtain that 
“elsewhere.” They cannot sell thè 
DOS because Apple owns it. Almost 
any unprotected piece of software 
contains Apple DOS. However, you 
miss all thè neat Utilities on thè Apple 
DOS master disk. You can buy thè 
master disk and DOS manual in thè 
DOS 3.3 upgrade package from Apple 
($70). You can also obtain thè DOS by 
joining A.P.P.L.E. (which all Apple 
users should consider) and buying 
some of their great Utilities, which all 
include DOS. The Apple DOS man¬ 
ual is sold separately for $10, and you 
absolutely cannot get along without 
this reference. 

OK, were over that hurdle and now 
have thè DOS. The manual gives de- 
tailed instructions on checking out thè 
System using thè standard DOS. You 
could stop right here and use thè Sys¬ 
tem as a standard Apple drive. But to 
use thè advantages of thè System (5 
msec track access time vs 18 msec and 
40 tracks vs 35 tracks) you must modify 
thè DOS using thè utility disk that 
Micro-Sci supplies with thè System. 
The extra tracks result in another 21K 
bytes of Storage space on thè disk. This 
is done once to create your own 40 
track, fast-seek master disk, from 
which all future copies are made. 


The manual supplies step-by-step 
instructions on modifying your System. 
The utility disk contains quite a bit of 
reading material, as well as programs 
to walk thè user through thè modifica- 
tion of DOS 3.2, 3.3, CP/M or Pascal 
to use thè drives' features. These 
changes are all transparent to thè user. 
The modified DOS can create 35, 40 or 
70 track disks. The 35 track disks can 
be read and written to by standard Ap¬ 
ple DOS. I had no trouble creating 
disks for thè standard Apple machine, 
although some utility programs as- 
sumed a 35 track environment and 
caused some problems. In most cases I 
was able to get around this. With more 
and more 40 track drives on thè mar¬ 
ket, I hope that utility writers make 
their software adapt to thè number of 
tracks on thè disk. 

Micro-Sci also sells a 70 track version 
of this drive, called thè A-70. This 
plugs into thè same controller as thè 
A-40. This drive has twice thè Storage 
capacity of thè standard Apple drive, 
and thè modified DOS recognizes any 
combination of 35, 40 and 70 track 
disks and drives. 

In fact, you can use any combina¬ 
tion of Apple and Micro-Sci A-40 and 
A-70 drives. This could be a big advan- 
tage where a lot of data is to be stored. 
Two A-70 drives give over a half mega- 
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byte of on-line Storage, equivalent to 
four Apple drives. A-70 drives can read 
35 and 40 track disks, but cannot write 
to them. Micro-Sci drives cannot be 
used on thè Apple controller card, and 
Apple drives cannot be used on thè 
Micro-Sci controller. 

Included in thè Utilities supplied by 
Micro-Sci are modifiers for thè Apple 
utility programs FID (File Developer) 
and Copy for supporting 35, 40 and 70 
track drives. The Hello program on thè 
master disk is also modified to indicate 
what DOS and stepping speed are be- 
ing loaded at boot time. The Hello 
modifications are in Basic and are sim- 
ple to use in your own Hello programs. 

I have never had any trouble read- 
ing or writing any disk intended for use 
on a standard Apple drive, except for 
one type of protection scheme which I 
will mention later. You do have to 
keep track of thè number of tracks on 
thè disk and thè stepping rate of thè 
DOS. I solved that by writing needed 
information on thè disk’s label. 

To use thè extra disk space on thè 
A-70 with VisiCalc, VisiDex, Visi- 
Trend and VisiPlot, Micro-Sci supplies 
Utilities to transfer these programs to 
70 track disks. This could be a big help 
to users of very large VisiCalc 
templates. 

Two more Utilities will teli you how 
many tracks are on an unkriown disk 
and also inform you as to your drive 
speed, with instructions as to how to 
set thè correct speed if necessary. 

After seven months of use, I have 
found only one limitation, that being 
that this drive will not “half-track.” 
There are a good many games written 
that use half-tracking as protection 
against software piracy. 

All'is not lost, however. Micro-Sci 
will change thè game to a format that 
thè A-40 can read, and thè software is 
stili copy-protected. Nibble copy pro¬ 
grams will now work on thè A-40 Sys¬ 
tem when trying to copy half-track 
programs. 

I found that after long sessions at thè 
computer I became a little annoyed by 
thè racket made by thè stepper motor 
for thè drive head, which is quite noisy 
when compared to thè Apple drive. 
For a $200 savings, though, I can live 
with it. The extra disk space made 
available has come in handy, as has 
thè $200. ■ 
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1. SAVINGS 


We sell everything 
for less. Our 
volume buying 
means extra 
savings for you 
(see below). 


2. QUALITY 





You might fìnd an 
item advertised for 
slightly less but 
you can t beat thè 
quality of our 
efficient Service. 
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4. DELIVERY 


In stock items are 
shipped within 24 
hours from thè 
receipt of order. 


5. CONVENIENCE 


Micro Mountain is 
as dose as your 
phone or your mail 
box Cali toll-free to 
check prices or to 
order. 


1 (800) 854-5649 
ASKFORA 
FREE CATALOG 
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they appear in our 
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can save an 
additional 10-30% 
on every item in 
thè catalog. 
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What does it do for programs? 

It makes wizards speak. It makes frogs croak. 
It makes Princesses shriek. It makes Martians 
zxnrbl. It makes music, bells, gunshots, whistles 
and lengthy speeches. 


It makes Apples talk! 



It makes all thè noises, says all thè words, 
blasts all thè invaders — It does what once 
you could only imagine. 

MOCKINGBOARD™ is Apple II® and Apple Plus® compatible. Watch for 
MOCKINGBOARD™ compatible with other computers. 


Sweet Micro Systems 

150 Chestnut Street, Providence, Rhode Island 02903 


(401) 273-5333 
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TM 


Whose programs does it work for? 
Your's and 

Sir-Tech Software, Penguin Software, Sierra On-Line, 
Datamost, Synergistic Software, Vagabondo Enter¬ 
prises, Hayden Software Company, Gebelli Software, 
G.Y.S.T., Budgeco, Lightening Software, Earthware 
Compter Services, M & R Enterprises, Legend Industries, 
Sunnyside Software 



It makes all thè difference in thè world. Ask your dealer 
for a demonstration. 


MOCKINGBOARD™ is Apple II® and Apple Plus® compatible. Watch for 
MOCKINGBOARD™ compatible with other computers. 


Apple II and Apple Plus are registered trademarks of Apple Computer Company. 


Sweet Micro Systems 

150 Chestnut Street, Providence, Rhode Island 02903 (401) 273-5333 















-Pascal- 

-Screen- 

Shepherd 


Pascal cursor control—simplicity itself with 
a little prompting from a fellow who knows how. 


I t’s good programming practice to 
precede any keyboard input opera- 
tion with an appropriate screen 
prompt. One way is to print a new 
prompt on thè screen before each key¬ 
board input operation. A less distract- 
ing method is to generate “boiler piate” 
prompts. A boiler piate prompt might 
look like Figure 1. 

The idea is to print thè entire 
prompt on thè screen and then have 
thè cursor jump from prompt to 
prompt as thè data is entered from thè 
keyboard. A reai advantage of boiler 
piate prompts is that thè user can view 
an entire record on thè screen while 
entering data. A simple boiler piate 
prompt, such as thè one in Figure 1, is 
easily generated with only a few 
WriteLn statements. More complicat- 
ed boiler piate prompts may take 
many lines of code to generate. Fewer 
lines of code are required to generate a 


Acme Boiler Company, Ine. 

“We make our competitore boil” 

Model [ / / ] Series [ ] 

Usecategory[ ] Number[ ] 

Date of Manufacture [ / / ] 

Maximum safe pressure (PSI) [ ] 


Figure 1. An example of boiler piate 
prompting. 


by David L. Kutzler 


complicated boiler piate prompt if thè 
programmer has flexibility in cursor 
position. This article offers a group of 


“A reai advantage 
of boiler piate prompts 
is that thè user can 
view an entire record 
on thè screen while 
entering data.” 


Pascal functions, in thè form of an in- 
trinsic unit, which give thè user finer 
control over cursor positioning on thè 
screen. 

Understanding thè 
Pascal Screen Driver 

When a Pascal program outputs 
something, it calls on a part of thè Pas¬ 
cal Operating System called thè Basic 
Input Output System (BIOS). BIOS 
acts as thè intermediary between thè 
program and a group of machine-lan- 
guage routines called device drivers. 
The device drivers provide thè soft¬ 
ware interface between thè Pascal Op¬ 
erating System and peripheral devices 
such as monitors, printers, modems. 


etc. If BIOS is directed by thè program 
to output something to thè screen, it 
passes thè output to a machine-lan- 
guage routine called thè screen driver. 
The screen, like theprinter, is a char- 
acter-oriented device—i.e., it con- 
sumes a stream of ASCII characters. 

The screen driver accepts ASCII 
characters from BIOS, and modifies 
thè screen display in some way. This 
depends on what character is received. 
Most often, this means that thè charac¬ 
ter representing thè ASCII code it re¬ 
ceived is displayed on thè screen, and 
thè cursor moves to thè next space. 
Characters like thè letter A, thè digit 6 
and thè symbol $, can be displayed on 
thè screen and are called printable 
characters. Not every ASCII character 
can be displayed on thè screen. ASCII 
codes 0-31 are control characters that 
cannot be displayed on thè screen, and 
are called nonprintable characters. If 
a nonprintable character is passed to 
thè screen driver, it either ignores 
thè character or carries out a special 
action. The nonprintable ASCII char¬ 
acters have been assigned special defi- 
nitions. ASCII character 8, (BS) is de- 
fined as a backspace. If this character 
is passed to thè screen driver, thè cur¬ 
sor moves one space backwards. Table 


Address correspondence to David L. Kutzler , 
C.N.M ., M.S., Chief Midwife , Gillette Birth 
Center , PO Box 1007, Gillette ; WY 82716. 
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EVERYONE NEEDS A... 





‘BATTERY 


6 MINUTES 
V*AC LINE 
2 MINUTES 


BATTERY 


(iIIARDIAN ÀgJGEI; 


ELECTRONICS. INC 


MICRO COMPUTER 


U LECTRONIC SAFETY 
0 IFESAVER FOR DATA 


PRINTER 


SAVE YOUR DATA 
FROM POWER OUTAGES! 


BACKUP FOR YOUR COMPUTER, MONITOR, PRINTER AND 5V4 " FLOPPY AND HARD DISC DRIVE 

• Automatically stops annoying problems from power line interruptions and brown outs • You need standby power to save data 

• Maintenance free backup power available in 115 volt or 220 volt • 50 or 60 HZ • 150 watts • Complete versatility — operate 
your System from a 12 volt source, i.e., automobile cigarette lighter, boat or airplane • Rugged self contained gel celi battery 

• No voiding warranty — no cutting wires • Automatic audio alarm warning tone during commercial power failure or interrupt 

• UL listed • FCC approved • Transient voftage suppressor gives added insurance from line voltage spikes, utilizing Zener Ray™ 

• Green/red LED power status indicator • Green — normal AC line power • Slow blinking red — at least 6 minutes of remaining 
standby power • Fast blinking red — approximately 2 minutes of remaining battery power • Solid state technology unexcelled 
by any UPS power unit in its class. 


SEE YOUR RH ELECTRONICS 
PRODUCTS DEALER 


ELECTRONICS, INC 


FOR YOUR APPLE II*: 

SUPER FAN II™. 

SUPER FAN ll™/ZENER RAY T 

SUPER RAM II™. 

RH 12 VOLT TRANSVERTER 

FOR MICRO COMPUTERS: 

GUARDIAN ANGEL™. 


COPYRIGHT © 1981 - PATENTS PENDING 

566 IRELAN, BUELLTON, CA 93427 
(805) 688-2047 
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“The code writes two prompts on thè 
screen.. .it’s simple and does thè job.” 


I lists thè nonprintable characters and 
thè action each one causes thè screen 
driver to take. 

Sometimes thè action caused by a 
nonprintable character does not match 
thè standard definition for thè charac¬ 
ter. For example, one would expect 
ASCII character 9 (HT for Horizontal 
Tabulation) to move thè cursor for- 
ward. Instead, ASCII character 9 is ig- 
nored by thè screen driver. To move 
thè cursor forward, ASCII character 
28 (FS, for File Separator) must be 
passed to thè screen driver. 

By a similar quirk, ASCII character 

II (VT, for Vertical Tabulation) does 
not cause thè cursor to move up. Send- 
ing ASCII character 11 to thè screen 
driver will cause some very bizarre and 
unpredictable things to happen. What 
happeas seems to depend on what fol- 
lows thè character. Most often, ten 
blanks will be sent to thè screen and 
thè next characterpassed to thè screen 
driver will be sent to thè Twilight 


Program listing 1. Cursor , a Pascal unti for controlling cursor and screen display. 

C$SH C Hust use "Swsp-pins*' option io coipiie uniis. 3 

Unii Cursor» 

Intnnsic Code 17 

Date 18» ( A date sesment is senersted* ) 

C } 

C "Cursor" is 3 unii of funciions which sre used io coniroi ine cursor and 3 
C screen dispisy. Since Ihey are sii funciions» ihey msy be used inside s 3 
C Urite or WriteLn statement. For exsmpie» ine foliowing insiruction; 3 

t 3 

C WriieLni Clesr»Ai<5»5 )»<vsrisbiel>»SKip( 3)»<vsrisble2> )» 3 

C 3 

C will clesr ihe screen» prini <vsrisbiel> si screen coordinsies <ìj»5>» 3 

C do ihree carpisse reiurns snd prini <vsrisble2>* 3 

C 3 

C A PeeK funciion snd Poke procedure ere provided snd operaie exsciiy iiKe 3 
C ine PEEK snd POKE ststements in BASIC. 3 

C 3 

Inierfsce 

Funciion Peek( sddress. inieser): inteseci 
Procedure PoKe( 3ddress»vslueJ inteSer>» 


Listing continued. 
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NEW FOR YOUR APPLE™ : 

The Ultimate Games ForBigBoys. 

AT ANINTRODIJCTORY PRICE OF JUST $199- 


These are thè ones you play for 
KEEPS. They indude everything your 
Apple needs to track commodities, 
trade stocks, compare options and 
either win or tose a fortune. Why go 
hunting for a measly pot of gold when 
you can play for stakes like that? 

Until now, you had to ante up about 
$1,800.00 just to sit in on thè game— 
only to find that price also bought you 
a lot of stuff you’d seldom use. But 
here’s everything you need—not just 
to get started, but to do very 
sophisticated analysis and price 
management (see box). For only $199- 

Now you can afford to track all that 
Haloid stock Aunt Millie promised to 
leave you. And even if you decide to 
buy every program in our library 
(over 30 now, and growing) youll 
spend far less than $1800 for thè 
most esoteric analysis possible. 

Of course, if you’re new to thè 
investing game, you may choose to 


Dato files sure 
CompuTVac compatitile 



Our introductory 
CHART TRADER + PLIIS 
package is $330-worth 
of software for $199* 

It includes ADTORUN that lets 
you set up a procedure, then 
walk away to diirner while it 
loads data, does your studies, 
ereates and prints charts all 
before you’ve had dessert. 
CONTÀINS: • Single or Multiple 
Moving Averages • Over- 
bought/Oversold Indicator • 
High/Low Price Band • Moving 
Average Oscillator • % Price 
Band • Constant Price Band • 
Daily Open, High, Low, dose 
Bar Chart • Graphs of 10 to 240 
Days • Grid Lines for Update • 
Relative Strength Index • On 



Balance Volume • Volume and 
Open interest Graph • And 
more! 

Includes Complete Data File 
Management — compatible 
with most stock ano 
commodities data banks for 
telephone acquisition. 

Send $5 for demo disk, or cali 
312-648-1904 for more 
information. 


just dip in a toe, and pretend for a 
while. See if you really have thè 
makings of a mogul. Ater all, if you 
take thè plunge, you have nothing to 
lose except your car, your home, your 
family, and your Apple. Now that 
could be a REAL Adventure. 

MasterCard and Visa holders order 

toU-free: 1-800-835-2246 

Ask for thè CHART TRADER + PLUS 
package (Demo not available 
through 800 number.) 


OWVs 

OMEGA MJCROVAJMME,MG 

222 SO. RIVERS1DE PLAZA 
CHICAGO, IL 60606 
312-648-1904 


Software by 

Orion Management, Ine. 


Apple is a registered trademark of Apple Computer Ine. Investor’s Tooikit and Omega MicroWare, Ine. are trademarks of Omega MicroWare, Ine. © 1982 Omega MicroWare. Ine. 
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SDA HAS THE PROGRAMS 
TO PLAN YOUR FUTURE! 


Career Dlrections 

•Asseti Interests 
•Select Occupations 
•Explore Options 
•Develop Career Plans 


College Dlrections 
Select collages based on 
•Cost and Size 
•Admission Stendardi 
•Areas of Studies 
•and many more factors 


User Friendly 
2 Diskette Programs 


For Apple II 




Success Through Planning 


See Your 

Authorized Apple Dealer or Contact: 
Systems Design Associates, Ine. 

P. 0. Box 389 

Charleston, West Virginia 25322 
(304) 342-0769 
Visa MasterCard 
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“Sometimes thè action caused by a 
nonprintable character does not match 
thè standard definition for thè character. ’ ’ 


Listing continued. 

Function Home» 

BeSin 

Hone ♦= Chr<25) 
end? 

(=ssssssssxas==:ssassBssssss=ssssssssss:===sssssssssss:=ssssssss3:ss=z=ssssss} 

c 3 

C “Clesr" is used to clesr ihe screen» } 

C } 

CsaSSS8BS8ÌSaesSS3ÌSSSBSSSS8SaSSBS==SStSSSSaSiSSSB==SSSSSSSS8SS8S==:=St3:SSSSSaSSSS===SS8SSSSS } 

Function Clesr? 

Besm 

Clesr ♦ = Chr(12) 
end? 


{=a;aaaaaaaaB=asEsaas 3 aaaa= 3 =a==:saaas== 3 :=;====ss£a========z==aasa====a=saaa} 

C 3 

C "Down" is used to nove thè cursor down 3 siven number of linea on thè 3 

£ screen» 3 

C 3 

[ssasssBasaaaasssssaassasaassaaassassssaasasassasassaaaassaassssasaaaaaaasssa} 


Function Down? 
Ver 


index» intener? 

Besin 

If iines < 1 then lines != 1? C Correct sny bed vsiues» 3 

For index ♦= 1 to lines do WritetChr(10 ) )? C Move cursor down» 3 

Down ♦= Chr(O) C Return 3 *'dun»y H value» 3 

end? 

{ss 8 ssasss 8 == 8 ssssssss 3 ssszssssssss:s 83 =zsssssssssss= 8 s=ssssssssss=sssssss 8 ssj 

£ 3 

C "Up" is used to nove thè cursor up 3 Siven number of lines on thè screen» 3 

C* 3 

Function Up? 

Ver 

index! inteSer? 

Besin 

If lines < 1 then iines 1? C Correct sny bad vslues» 3 

For index !* 1 to lines do Write(Chr(31 ))? i Move cursor up» 3 

Up ♦* Chr<0) C Return a "duRiy" value» 3 

end? 

£ BaaBsssssssaassaasBasazsssssssBasaaasssssssrBSasssassaaaBaisassszsasasaaaasrJ 

c 3 

£ "Risht 11 is used to eove thè cursor 3 diven nueber of colusns to thè risht» 3 
C 3 

{SZSC33SS£ZZ833ZaSSB3SSZZ3Z33Z3333SS8ZZZS5SSSS33SSZZZSS3SS3S33XSZ==333338ZX8S} 

Function Ristht? 

Vsr 

index» inteeer? 

BeSin 

If coluens < 1 then coluens !« 1? C Correct sny bad values» 3 

For index !» 1 to colunns do Write(Chr<28))? C Move thè cursor» 3 
Risht := Chr(O) £ Return a "duM»y“ value* 3 

end? 

{ ssstBssssissssa^sssa&SBsssiXsasasssMSSSSSsssissssiSsaazBSsasssssssssssssssriSsssasssssassxsaiss} 

C 3 

£ "Left" is used to aove thè cursor 3 siven nuaber of coiuans to thè left» 3 

Listing continued. 


causes a problem if you are sending 
characters to a printer, as some print- 
ers generate a linefeed of their own 
whenever they receive a carriage re¬ 
turn. The printer-generated linefeed, 
plus thè one generated by BIOS, will 
cause thè printer to doublé space or 
even fail to operate. If you have a 
problem, refer to pages 214-215 of 
your Apple Pascal Operating System 
Reference Manuale 

The screen driver must always know 
thè location of thè cursor on thè screen. 
It Stores thè current X and Y cursor co- 
ordinates in memory locations 244 and 
245 ($00F4 and $00F5) respectively. 
This applies to Apple II Pascal version 
1.1 only. It does not apply to Apple III 
Pascal, and may not apply to future re- 
leases of Apple II Pascal. Furthermore, 
thè addition of certain peripheral 
equipment to thè Apple II may change 
these locations. Putting a Videx 
80-column board in expansion slot §3 
of your Apple II will cause thè X coor¬ 
dinate to be stored at memory location 
1403 ($057B), and thè Y coordinate to 
be stored in memory location 1531 
($05FB). 

Communicating 
With thè Screen Driver 

Standard Pascal statements cause 
thè screen driver to carry out some of 
thè actions described above. WriteLn; 
will send a carriage return to thè 
screen driver. Page(output); will cause 
thè screen driver to clear thè screen 
and position thè cursor at screen loca¬ 
tion (0,0). GotoXY(X,Y); will cause 
thè screen driver to position thè cursor 
at screen location (X,Y). These state¬ 
ments are simple to use, but can result 
in ponderous and redundant code. 
Consider thè following code segment: 

W riteLn(prompt 1 ) ; 

WriteLn; 

WriteLn; 

WriteLn; 

W riteLn(prompt2) ; 

The code writes two prompts on thè 
screen, separated by three blank lines. 
It’s simple and does thè job, but it’s re¬ 
dundant. Compare it to thè following 
line of code: 

WriteLn(promptl,Chr(13),Chr(13),Chr(13), 

prompt2); 

This does thè same thing as thè five 
lines of code in thè previous example. 
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Lkting continued. 
C 

Funciion LefU 


index? mteSer» 




Besin 

If columns < 1 then columns ♦ = 1? 


C Correct sny bsd vsiues* > 


For index l- 1 lo columns do torite( Chr<8))» C Hove thè cursor* 3 


Left t» Chr<0) 
end» 


{ Return 3 "dummy H value* ) 




C "SKìp" is used to skìp 3 siven number of lines* 
C 

Function SKie» 


index? inteser? 

BeSin 

If lines < 1 then lines ì= 1» t Correct any bsd vaìues. 3 

For index t= 1 to lines do torite(Chr<13))$ C SKìp some lines* 3 


Lkting continued. 


The difference is that thè standard Pas¬ 
cal function Chr(13) was used to cause 
thè carriage returns rather than three 
WriteLn statements. The Chr function 
returns thè ASCII character whose or¬ 
dinai value 0-127 is passed to it as an 
argument. Chr even returns nonprint- 
able characters. Since it is a function, 
Chr may appear in a Write or WriteLn 
statement just like any other write pa- 
rameter, and thè character which it re¬ 
turns will be sent to thè screen driver. 
The Chr function provides us with a 
convenient mechanism for passing spe¬ 
cial control characters to thè screen 
driver. 

The second version of thè example 
code is stili redundant because Chr(13) 
must be written three times. A better 
approach would be to write a function 
which could send any number of car¬ 
riage returns to thè screen driver. Such 
a function appears below: 

Function Skip(lines: integer): char; 

Var 
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■INTERSTELLARDRIVE 

A SÒLID STATE DISK EMULATO!? 





SAVE MONEY! Bas 

fncrease your * « 

computer'; productivfty * * 

The INTERSTELLAR DRIVE is a high performance 
data Storage subsystem with independent power 
supply, battery backup, and error detection. It has 
256KB to 1 Megabyte of solid state memory integrated 
to perforai with your operating System. 


Save valuable time! 

5 to 50 times faster 
performance than floppy disks 
1 * and Winchester drives 

PION'S INTERSTELLAR DRIVE is designed for use with a 
family of interfaces and software packages. Currently avail- 
able are interfaces for IBM, SI00, TRS80, Apple, SS50, and 
most Z80 uP, and software for most popular operating systems. 
Additional interfaces are continually being developed for thè 
most popular computers. 

Basic Price for 256KB unit [Includes Interface and software] 

$ 1095 . plus tax (where applicable) and shipping |M] |H"p| 


Visa and Master Card accepted. 


PIONwnc. 


101R WalnutSt.Watertown, MA 02172 

TRS80 trademark of Tandy Corp. Apple trademark of Apple Computers 
Interstellar Drive trademark of PION, Ine. 
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Introducine 

SooperSpooler’s™ Little Brother 


CONSOLINK 

CORPORATION 


«isn 


uLINK 


Without MicroSpooler With MicroSpooler 

21 Minutes 16 Seconds 

CPU time for 20 pagest CPU time for 20 pagesf 

80 CPS Bidirectional 

For immediate answers to your questions, cali Toll Free: 800-525-6705 

Consolink Corporation , 1840 Industriai Circle , Dept. ML1-205 Longmont, CO 80501 (303) 652-2014 
*FormerIy Compulink Corporation f 60 lines per page, random line lengths, 40 char/line. 

**Consult your dealer or Consolink for details Assumes CPU can output text at a minimum of 3000 char/sec. 


CONSOLINK CORPORATION 
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Who knows spoolers better than 
Consolink?* Wepioneered thisindustry 
with our revolutionary SooperSpooler, 
thè Intelligent Printer Interface. 

Now meet thè newest family addition: 
MicroSpooler™ 

especially designed and engineered for 
those who need cost-effective Solutions 
to their spooler requirements without 
sacrificing quality and sophistication. 

No More Waiting on thè Printer 

The new MicroSpooler Stores data and 
then feeds it to a printer as fast as thè 
printer can handle it. 

That means no down time: in a 
matter of seconds, your computer is free 
for thè next job without waiting 
for thè printer to finish thè last job. 


MicroSpooler 

BUFFER / INTERFACE 


STATUS 


Quality, Reliability, Flexibility 

As with thè SooperSpooler, thè new 
MicroSpoolers are thè product of thè 
highest engineering standards to insure 
trouble-free operation. Now Consolink 
offers a complete line of stand-alone 
spoolers that can be installed in-line 
between virtually any printer and 
any computer. 

Easy to instali. Easy to use. Easy on 
thè budget. 

Features include: 

■ 16K Memory : User or factory 
expandable to 32K or 64K 

■ Multiple Copy Function 

■ Status Readout: Tells you how much 
data is stored or how many copies 
are left to run 

■ Pause Function: To let you change 
paper, make adjustments 

■ Self-Test Routine: Performs a 
comprehensive check of most 
internai functions and memory 

■ Internai Power Supply: No bulky 
plug adapters 

■ Vertical Mount Configuration: 

Saves desktop space 

■ Plug-in connections to most 
computer combinations 


■ Independently Selectable Baud Rates 
on Serial Ports 

■ One Year Limited Warranty** 

■ Thirty-Day Money Back 
Guarantee** 

■ Four Models: Any Combination of 
Parallel or Serial I/O 

■ $199 for 16K parallel to parallel 
unit with an internai power supply 

And When You Need thè Very 
Best... 

Remember SooperSpooler, thè 
Intelligent Printer Interface with a 
remarkable range of software 
controlled features and formatting 
capabilities. 

See our new MicroSpoolers at 
quality dealers everywhere. For 
immediate answers to your questions, 
cali Toll Free 800-525-6705 

Spoolers by Consolink— 

Now you have an Intelligent 
Choice. 


COPY 

PAUSE 












Listing continued. 

SKip := Chr(O) C Return 3 "dummy” vsiue. } 

end» 

C } 

C "At* allows thè user to position thè cursor enywhere on thè screen. 3 

C } 

£assssasss5=:s=ss8=ssss:ss=£ssssss=s=s===sssssssssssss=3ssssssssssssssssssss8} 


Function At» 

Besin 

If X < 0 then X t= 0» 

If Y < 0 then Y !■ 0» 

If X > 79 then X ì= 79» 
If Y > 23 then Y := 23S 
GotoXY( X»Y)» 

At ;= Chr(O) 
end» 


C 3 
C "Tab" sllows thè user to position thè cursor on sny coìumn 0..79 of thè } 
( current line* This function is psrticulsrly useful when printins tabular 3 
{ columns of numbers* } 
C 3 


Function Tsb» 

Begin 

If CQiumn < 0 then column 1 = 0» 

If column > 79 then column *= 79» 
GotoXY< co1umn »CursorY )» 

Tsb Chr<0) 
end» 


C 3 
C "Center" prints 3 strini so that it is centered on thè current line* lf 3 
C you sre usms 3 standard Apple 40 column display» ehsnse thè vslue of thè 3 
C Constant "middle" to 19* 3 
t 3 


Function Center» 

Qonst 

middle * 39» 

Oar 

offset: inteser» 

Besin 

offset := middle - <Lensth<thread) DIV 2)» 
Write(Tsb< offset )»thread )» 

Center i= Chr(0) 
end» 


C 3 
C "Beep" is used to sound thè Apple 3t speaker fron inside a Urite or 3 
C UriteLn statement* 3 
t 3 


Function Beep» 
Besin 

Beep *= Chr(7) 
end» 


Besin C Initiali 2 e thè unit* 3 
end» 


C Calculate thè offset* 3 
{ Tab and Urite strina* 3 
C Return a "dummy" value* 3 


C Correct any b3d values* 3 

C Move cursor to thè correct column* 3 
t Return a “dummy” value» 3 


i Correct any bad values. 3 


C Position thè cursor at location (X»Y)* 3 
{ Return a "dummy" value. 3 


index: integer; 

Begin 

I£ Lines<l then lines : = 1; 

For index : = 1 to lines do Write(Chr(13)); 
Sldp : = Chr(0) 
end; 

The Skip function is clear but thè 
last line may need more explanation. A 
function must return a scalar value of 
some sort. If a function appears in a 
Write or WriteLn statement, thè value 
it returns is output to thè screen. The 
purpose of thè Skip function is to send 
a specified number of carriage returns 
to thè screen, not to output a value to 
thè screen. 

The point of using a function rather 
than a procedure is that a function can 
appear inside a Write or WriteLn 
statement while a procedure cannot. 
The trick is to prevent thè returned 
value from messing up thè screen after 
thè function has done its job. You do 
this by taking advantage of thè fact 
that certain nonprintable characters 
will be ignored by thè screen driver. 
The function is declared to be of type 
“char,” and is then assigned ASCII 
character 0 (NULL), which is passed 
to thè screen driver and thereafter ig¬ 
nored. Rewrite thè example code with 
thè Skip function as follows: 

WriteLn(prompt 1 ,Skip(3) ,prompt2) ; 

Note thè simplicity and economy of 
this version of thè code when com- 
pared to thè originai five-line version. 
In certain applications, thè Skip func¬ 
tion can save thè programmer many 
lines of redundant code. 

A similar and perhaps more useful 
function is thè At function, which is 
similar to thè GotoXY statement ex- 
cept that it’s more convenient. Consid- 
er thè following code segmenti 

GotoXY(39,5); 

WriteLn(promptl); 

GotoXY (39,6); 

WriteLn(promptl); 

Note that a separate statement must be 
used for each cursor positioning and 
write operation. It would be simpler if 
thè cursor positioning could be done 
inside a Write or WriteLn statement. 
The At function accomplishes this as 
follows: 

Function At(X,Y: integer): char; 

Begin 
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(==ss===:ss=========ss====ss==ss;sssss5sss=ss5sssss5sss====;==s=ssss=55=r=t=s} 

C } 

( Benonstrste is s oeinonstretion prosrsn for demonstratins ih© functions of J 

£ ine Pascal intrinsic code unii "Cursor"» To funciion properly» you must } 

£ have an Apple 31 wiih a LsnsueSe card installed in slot *0» Apple Pascal 3 

£ version 1.1 and a Videx 80 coiuan card installed in slot #3* 3 

£ 3 

Uses Cursori 


X»Y* intesier» 

Procedure Deboli 
Besin 

WriteLniClear» 

'CursorX and CursorY «ili return thè current screen coordinates of' » 
' ine cursor.' )» 
lOriie( Skip< 5)» 

'Press RETURN and ine current value of <X»Y) will be tìisplased' )» 

X ♦= CursorXi 
Y t= CursorY? 

ReadLn» 

WriteLnt SKÌP<5)»'The cursor was ai location. ('»X»'»'Vt»' )*' )» 

Write<Skip<5)»'Press RETURN to continue.')» 

ReadLnf 

WriieLn( Clear»Skip<5 )» 

'The functions "Clear" and M SkiP(5) were Just executed.')> 

Write( 'Press RETURN and thè function H Ho»e" will be executed.' )» 

ReadLn» 

WriteLn< Hoise»'<—The cursor was noveri to here» but thè screen left alone.' )» 
Write('Press RETURN to continue.' )» 

ReadLn» 


Procedure Benio2» 

Besin 

Write(Clear» 

'The "Up" and "Down 0 functions wili be denionstrateo next.')» 

Write(Skip(5)»'Press RETURN to see it.' >» 

ReadLn» 

Writet Skip<5))» 

For X l-l to 7 do Writet 'XXXXX'»Hown(3 )»'XXXXX' »Up( 3 ) )i 
Write(Skip(5)»'Press RETURN to continue*' )» 

ReadLn» 

Write< Clear»'The "Riant" and "Left" functions will be aemonstrated next*')» 
Write( SKìp( 3)»'Press RETURN to see it.')» 

ReadLn » 

WriteLn» 

For X != 1 to 8 do Writet Down( 1 )»RiSht< 20)»'RIGHT' »l»own( 1 )»Left< 11 )»' LEFT' >» 
Write( Hoie»SKip( 3>»'Press RETURN to continue*')» 

ReadLn» 
end» ■ 

Procedure De»o3» 

Besin 

Write( Clear »'The "At" function will be used to put an "X" at screen '» 

'location (39»11 ).' )> 

Wriiet SKìp( 5)»'Press RETURN to see it.')» 

ReadLn» 

Write(AU39»U)»'X' >» 

Writet Hoae»SKiP<5 )»'Press RETURN to continue.')» 

ReadLn» 

end» 

Procedure Demo4» 


Beri in 

Write<Clear»'The "Tab" function is nice for tabulatine coluans of nuabers*' )» 
Write(Skip(3>»'Press RETURN to see it.')» 

ReadLn» 

GotoXY( 0»5 )» 

For X := 1980 to 1990 do Write(Down(1 )»Tab<5 )»X>» 

6otoXY< 0»5 >» 

For X t= 1234 to 1244 do Urite<Bownt1 )»Tab(15)»X )» 

CotoXYT 0»5 )» 

For X ♦= 1555 to 1565 do Write<Bown(1 )»Teb<25 )»X )» 

GotoXYt 0»5 )» 

For X 2000 to 2010 do WritetBown<1 )»Tab<35 )»X>» 

GotoXY(0»5)> 

For X *.= 9989 to 9999 do Urite( DownU )»Tab( 45 )»X )» 

WritetHoae»SKÌp(3)»'Press RETURN to continue*')» r . .._^ 
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Program Ustmg 2. 

Demonstrate, a program for demonstrating thè 
functions of thè Pascal intrinsic code unii Cursor. 


If X<0 then X : - 0; 

If Y<0 then Y : = 0; 

If X>79 then X : = 79; 

If Y>23 then Y : = 23; 

GotoXY(X,Y); 

At : = Chr(0) 
end; 

The previous code segment can now be 
simplified as follows; 

WriteLn(At(39,5) ,promptl, At(39,6) ,prompt2) ; 

Note thè economy and elegance of this 
single line of code compared to thè 
four lines it replaces. 

A Bag of Tricks 

The Skip and At functions are in- 
cluded in an intrinsic unit called Cur¬ 
sor (refer to Listing 1). Several other 
useful cursor and screen control func¬ 
tions are included in thè unit and are 
briefly described in thè paragraphs 
which follow. 

The first two routines in Cursor are 
a Peek function and a Poke procedure. 
These routines operate exactly like thè 
Peek and Poke routines in Applesoft 
Basic. The Peek function is included 
with thè unit because some of thè other 
functions must examine thè contents of 
memory locationS. The Poke proce¬ 
dure is not used by any of thè other 
functions, but is included with thè unit 
for completeness. Use thè Poke proce¬ 
dure at your own risk. A careless Poke 
can cause thè entire Pascal Operating 
System to crash in such a way that only 
a cold boot will recover it. 

The CursorX and CursorY functions 
are integer functions which respeetive- 
ly return thè current X and Y screen 
coordinates of thè cursor. The follow- 
ing is an example of thè CursorX and 
CursorY functions in use: 

WriteLn(promptl,At(CursorX + 15,CursorY), 
prompt2); 

The Home function will move thè 
cursor to thè upper left corner of thè 
screen, but will not otherwise disturb 
thè screen display. The Clear function 
will move thè cursor to thè upper left 
corner of thè screen but will erase thè 
screen. Here is an example of these two 
functions: 

WriteLn(Clear,Skip(5) ,promptl ,Skip(5), 
prompt2, Home,‘Are you ready? ’); 

The Up and Down functions move 
thè cursor a specified number of lines 
above or below its current position. If 
thè cursor “bumps” into thè bottom of 




Listing continued. 

ReaoLn» 

enei» 

Procedure DeifcoS» 

Besm 

Wntet Clear > ' The "Center" function is nice for aaKins title heariinss.')» 
WritetSK ìp( 3)»' Press RETURN lo see il#' )> 

ReadLn» 

Write(Clear »SKìp( 5 )» 

Center( 'Pascsi Cursor Controlt' )»SkÌP< 2 )» 

Centert'How lo Gain Control of Your' )»Skip(2 )» 

Center('Life and Prosrams.')»Home» 

'Press RETURN to terminate program»' )» 

ReadLn» 

end» 

Besin 

Write(Clear »SKìp( 5)»Center< ' Pascal Cursor Control')» 

SKìp( 5)»Center('Press RETURN to continue'))» 

ReadLn» 

Demol» 

Liemo2» 

Deao3» 

Liemo4» 

Bemo5 

end. 


Number 

Character 

Definition 

Screen action 

0 

NUL 

Nuli 

Ignored 

1 

SOH 

Start of heading 

Ignored 

2 

STX 

Start of text 

Ignored 

3 

ETX 

End of text 

Ignored 

4 

EOT 

End of transmission 

Ignored 

5 

ENQ 

Enquiry 

Ignored 

6 

ACK 

Acknowledge 

Ignored 

7 

BEL 

Bell 

Sound speaker 

8 

BS 

Backspace 

Backspace 

9 

HT 

Horizontal tabulation 

Ignored 

10 

LF 

Linefeed 

Linefeed 

11 

VT 

Vertical tabulation 

E rase to end of screen 

12 

FF 

Form feed 

Clear screen, cursor to (0,0) 

13 

CR 

Carriage return 

Cursor to column 0 of next line 

14 

SO 

Shift out 

Ignored 

15 

SI 

Shift in 

Ignored 

16 

DLE 

Data link escape 

Bizarre, unpredictable effects 

17 

DC1 

Device control 1 

Ignored 

18 

DC2 

Device control 2 

Ignored 

19 

DC3 

Device control 3 

Ignored 

20 

DC4 

Device control 4 

Ignored 

21 

NAK 

Negative acknowledge 

Ignored 

22 

SYN 

Synchronous idle 

Ignored 

23 

ETB 

End of transmission block 

Ignored 

24 

CAN 

Cancel 

Ignored 

25 

EM 

End of medium 

Move cursor to (0,0) 

26 

SUB 

Substitute 

Ignored 

27 

ESC 

Escape 

Ignored 

28 

FS 

File separator 

Nondestructive forward space 

29 

GS 

Group separator 

E rase to end of line 

30 

RS 

Record separator 

Bizarre, unpredictable effects 

31 

US 

Unit separator 

Move cursor up one line. 

Table 1. Summary of screen driver actions caused 

by nonprintable characters. 


thè screen while moving down, thè 
screen will scroll up thè appropriate 
number of lines. If thè cursor bumps 
into thè top of thè screen while moving 
up, it will stop (i.e., thè screen will not 
scroll down). Here is an example of thè 


Up and Down functions: 

WriteLn(Clear,Skip(12),‘LOW\Down(5), 

‘LOWER\lìp(9) /HIGH) ; 

The Right and Left functions will 
move thè cursor a specified number of 


spaces to thè right or left of its current 
position. The functions are nonde- 
structive—they will not disturb exist- 
ing text on thè screen. If thè cursor 
bumps into thè right margin while 
moving right, it will jump to column 0 
of thè next line even if thè screen must 
scroll up to allow it. If thè cursor 
bumps into thè left margin while mov¬ 
ing left, thè cursor will jump to column 
79 of thè previous line unless it is at 
screen position (0,0), in which case it 
will temain in place. Here is an exam¬ 
ple oè thè Right and Left functions: 

WriteLn(Clear,Right(20),‘RIGHT’, Left( 15), 
‘LEFT’); 

The Tab function will position thè 
cursor at a specified column 0-79 of 
thè current line. This function is par- 
ticularly useful when printing tabulat- 
ed colurpns of numbers. Here is an ex- 
ampie of thè Tab function: 

For index : = 10 to 25 do Write(Down(l), 
Tab(39),index); 

The above line of code will print a col¬ 
umn of numbers down thè middle of 
thè screen. The same task would re- 
quire many lines of code if thè Tab 
function were not used. 

The Center function will center a 
string on thè current line. Here is an 
example of thè Center function: 

WriteLn(Clear,Skip(6) ,Center(’Pascal Cursor 

Control’)); 

The Beep function is a convenient 
way to sound thè Apple speaker. This 
is useful when an audible cue is de- 
sired. Here is an example of thè Beep 
function: 

If error then Write(Home,Beep,’ERROR: 

Reenter Data~>’); 

How to Use Cursor 

To use Cursor, type Listing 1 into 
your editor. Compile thè text file and 
use thè System librarian utility pro¬ 
gram to link thè intrinsic code file into 
your System.Library (refer to pages 
186-193 of thè Apple Pascal Operating 
System Reference Manual). The unit 
may be invoked by placing thè state¬ 
ment Uses Cursor; immediately after 
thè Program <identifier>; statement 
in your Pascal host program (refer to 
pages 72-81 of thè Apple Pascal Lan- 
guage Reference Manual). You will 
find many applications for these useful 
functions. ■ 
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Business 


Graphing Growth 

with Pressure Curves 


With this handy technique your Apple II 
will help you forecast business cycles. 


by Richard Green 



Program Usting. Plotting pressure curves. 


LIST 



0 REM * PRESSURE REVISITED * 



1 REM * BY RICHARD GREEN * 



2 REM * JULY 10, 1982 * 



3 REM 



4 REM 



5 REM * CLEAR VARIABLES * 



7 CLEAR i RESTORE I DIM A<60>1 

DIM B(60)1 DIM C(60>1 

DIM D(60 ) 

10 

HOME 



15 

REM * MAIN MENU * 



20 

PRINT 



30 

PRINT " 44444444 * 4444444444444444444444444444444 " 


"10 

FOR X = 3 TO 20 



50 

VTAB X 



60 

PRINT "4"i SPC( 38 ) } "4" 



70 

NEXT 



80 

VTAB 21 



90 

PRINT " 4444444444444444444444444444444444444444 " 


100 

VTAB 3 



i 110 

PRINT i HTAB 41 PRINT "1) 

ENTER DATA" 


120 

PRINT 1 HTAB 41 PRINT "2> 

SAVE DATA" 


130 

PRINT 1 HTAB 41 PRINT "3) 

RAM DATA TABLE" 


140 

PRINT 1 HTAB 41 PRINT "4) 

3MMA DATA TABLE" 


150 

PRINT 1 HTAB 41 PRINT "5) 

PRESSURE DATA TABLE" 


160 

PRINT 1 HTAB 41 PRINT "6) 

PLOT CURVE" 


170 

PRINT 1 HTAB 41 PRINT "7) 

PLOT BAR GRAPH" 


175 

PRINT 1 HTAB 41 PRINT "8) 

EDIT RAW DATA" 


180 

UTAB 231 HTAB 41 INPUT "ENTER NUMBER "IP 


190 

IF P * 1 THEN V = 01 GOTO 

270 


200 

IF P = 2 THEN V = 01 GOTO 

1420 


; 210 

IF P = 3 THEN V - 01 GOSUB 20001 GOSUB 610 


215 

IF P * 4 THEN V « 11 GOSUB 30001 GOSUB 610 


218 

IF P =s 5 THEN V = 1J GOSUB 60501 GOSUB 610 


220 

IF P ss 6 THEN Q = 11 GOTO 

990 


230 

IF P s» 7 THEN Q = 21 GOTO 

990 


235 

IF P =s 8 THEN 1800 



240 

GOTO 10 



270 

REM * DATA ENTRY MENU * 



271 

HOME 



272 

FOR X = 0 TO 60 



! 274 

A(X > = 01B(X) = 01C<X) = OID(X) = 0 


276 

NEXT X 



280 

PRINT 



290 

PRINT "DATA ENTRY"! PRINT 



300 

INPUT "FROM KEYBOARD OR DISK? "ÌQ* 


310 

IF Q* = "DISK" THEN GOTO 

1560 


320 

REM x KEYBOARD INPUT x 



321 

HOME 



330 

PRINT 



340 

INPUT "TITLE? "IH» 



350 

HOME 1 PRINT 



360 

B - 360 






Listìng contmued. 


R emember when our 4K Level I 
TRS-80s could outperform thè 
most powerful mainframes? Well, at 
least in our minds they could. Why, 
we had our own Star Trek program 
and everything. Unfortunately, when- 
ever someone would ask, “ What does it 
do besides play games?” we were hard 
pressed to show any reai practical use 
for our favorite toy. 

The December 1978 issue of KUo- 
baud (now Microcomputing ) maga- 
zine solved thè problem of practicality 
for me. There on page 80 was a reai 
business program written for a 4K 
Level I machine (“The Ups and 
Downs of Business,” by Jim Wright). 
Mr. Wright’s article describes thè use 
of pressure curves to forecast business 
cycles. 

A pressure curve, according to 
Wright, “is a graph of thè ratio of sales 
(or any other variable) in a particular 
period compared to sales in some 
previous period.” In other words, if 
you compare data for any month with 
thè data for thè same month a year 
ago, and plot thè results, you will have 
a curve showing thè rate of change of 
growth. You will be plotting a pressure 
curve. The method used in Wright’s 
program is to first smooth thè raw data 


Address correspondence to Richard Green , PO 
Box 15157 , Fremo , CA 93702. 
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ToDoItRight. 

To make a Winchester disk for just Apple®II. 


That’s how we set out to design our hard disk for 
thè Apple®II. To understand thè needs of serious 
users and programmerà and to correct thè errors 
of our predecessors. 

You want user-friendliness. So we wrote hard disk 
versions of Apple DOS, CP/M® and Pascal that 
are highly user-friendly and loaded with 
useful features. 

□ Auto-boot hard disk 

□ Menu-driven Utilities 

□ Single-keystroke program execution in DOS 

□ Disk search with wild cards, and many more 

You want flexibility. So we made every 
feature variable. 

□ From 1 to 16 operating systems on each disk 

□ Operating System spaces grow as needed 

□ Slot independence 

□ Variable size volumes (to 400K in DOS) 

□ Mountable and unmountable volumes (even in CP/M) 

□ Custom DOS allowed 

You want reliability. We use thè leading drive. 
And Corona’s unique data protection technology. 

□ DataGuard™ 32-bit error correction code 

□ FailSafe™ read-after-write and automatic bad-sector reallocation 

□ 2-level impact-protection packaging 


You want low-cost backup. So we wrote backup 
Utilities that make floppy backup convenient. 

□ File compacting to reduce thè number of floppies 

□ Volume selective backup in all operating systems 

□ Automatic diskette sequencing to ease floppy handling 

You want compatibility. We maximize compati- 
bility with existing software and peripheral cards. 

□ 9K interface card leaves main memory untouched 

□ Interrupts are allowed 

□ Boot protected floppies from slot 6 without removing hard disk 

□ Automatic slot/drive to hard disk remapping 

And you want support. We do that right too. 

□ Hardware depot Service in every region 

□ Software theft-protection on thè hard disk 

Compare thè features that matter to you. 

And visit our locai dealer or distributor for 
a demonstration. You’ll see thè difference 
specialization makes. 


Corona Starflre™— The Winchester Disk for Apple II 

$2495 / 5 MB <2995 / 10 MB 

(All software included. Pascal not needed for CP/M.) 

Now $2195 Now $2695 



The Third Generation Microcomputer Company 

Corona Data Systems • 31324 Via Colinas, Section 110, Westlake Village, CA 91361 • 213-706-1505 
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The Tax Break 
You’ve Been Looking For! 


You Just Found It! 

E-Z Tax — thè easiest to use tax 
preparation software ever developed. 
Now you can do your own tax return 
without any knowledge of taxes or 
computer programming. 

E-Z Tax’s self-prompting questions 
assure you that nothing is overlooked. 
The program automaticallycomputes 
thè lowest tax for you. 

E-Z Tax prepares thè following IRS Form» 
and Schedules 


1040 A 

2106 

1040 EZ 

2119 

1040 P. 1 & 2 

2210 

Sch. A 

2440 

Sch. B 

2441 

Sch. C 

3468 

Sch. D 

3903 

Sch. E 

4137 

Sch. F 

4684 

Sch. G 

4972 

Sch. R/RP 

5695 

Sch. W 

6251 

1040 SE 

6252 

1040 ES 



Apple IT " is a trademark of Apple Computer, Ine. 
CP/M™ is a trademark of Digital Research, Ine. 
IBM™ is a trademark of IBM Corp. 

Atarr “ is a trademark of Atari, Ine. 


Prints on Federai Forms 

It’s so easy to use, you’ll be doing 
your tax return thè moment you insert 
thè SVa" disk. When you’re finished 
E-Z Tax will print out your Informa¬ 
tion on thè officiai Federai Forms. 



* Ttf 


Very Friendly! 

E-Z Tax is user friendly. When you 
have a question, thè program will teli 
you on what page in thè E-Z Tax Guide 
Book you’ll find thè answer. If you 
make a mistake thè program alerts you 
immediately with screen prompts. 

We Support You! 

E-Z Tax has a toll-free customer 
Service number available 24 hours a 
day for your convenience. 

Never in thè history of computer 
software has there been so much for 
so little. 


ONLY $ 69 95 

TAX DEDUCTIBLE 

Available in thè following versions. 
Apple II (48k), IBM PC (64k), Atari 
and CP/M. 

For thè name of your 
nearest distributor CALL: 


2444 Moorpark, San Jose, CA 95128 


408/264-1040 
800/331-1040 U.S.A. 
800/344-1040 CA 


Circle 155 on Reader Service card. 
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Listing continued. 

370 INPUT “FIRST YEAR? "JE 
380 PRINT 

390 PRINT “NUMBER OF MONTHS" 

40 0 INPUT "<MAX=6Q) "!R 

410 IF R > 60 THEN HOME ! GOTO 380 

415 RESTORE 

420 FOR T = 0 TO (R - 1> 

430 HOME 
440 PRINT 
450 Y - 0 

460 Y = INT (T / 12) 


470 

I - E + 

Y 



480 

PRINT 

“DATA FOR 

"I 

490 

IF T « 

12 

THEN 

RESTORE 

500 

IF T = 

24 

THEN 

RESTORE 

510 

IF T = 

36 

THEN 

RESTORE 

520 

IF T = 

48 

THEN 

RESTORE 

530 

IF T = 

60 

THEN 

RESTORE 

540 

PRINT 




550 

READ Z* 



560 

PRINT 

Z*JÌ 

! INPUT 

Q 

570 

B ( T > = 

Q 



580 

NEXT T 





585 RESTORE 

590 DATA JAN , FEB,MAR ,APR ,MAY , JUN , JUL ,AUG »SEP ,OCT ,NOV,DEC 
600 GOTO 10 

610 REM * DATA TABLE * 

620 YEAR - E 

630 HOME J RESTORE 

640 PRINT 

650 PRINT “DATA FOR "JW* 

660 PRINT 

670 FOR T = 6 TO 38 STEP 7 

680 PRINT TAB < T)JYEAR» * YEAR « YEAR + lì NEXT 

690 PRINT t PRINT “ -" 

700 FOR T * 1 TO 12 
710 READ M* 

720 print mì;"!" 

730 NEXT 
740 T * 7 

750 FOR X = 0 TO 59 STEP 12 

760 VTAB 7 

770 FOR Z = O TO 11 

780 HTAB T! PRINT A(Z + X> 

790 NEXT Z 

800 T = T + 7! NEXT X 

805 REM * FIND MAX AND MIN x 

810 U = A(0)!H = 999999 

820 FOR X = V*TO R - (1 + V) 

825 IF A(X> = 0 THEN 850 

830 IF A(X> > U THEN U = A(X> 

840 IF A(X) < W THEN H - A<X> 

850 NEXT X 

855 IF U = 0 THEN FLASH ! PRINT ! PRINT “INSUFFICIENT DATA!"! NORMAL ì GOTO 
1360 

857 REM x PRINT MAX AND MIN x 

860 PRINT ! PRINT ! PRINT “MAX.=“ÌU,Ì PRINT "MIN.=> “JW 

865 IF P = 5 THEN V = 13 

870 FRMT = (150 / U) x .95 

875 GOSUB 5000 

880 PRINT 

890 INPUT "PRESS RETURN TO CONTINUE"JP$ 

900 RETURN 

990 REM x GRAPHING ROUTINE x 

991 HOME ! GOSUB 1020 
1000 IF Q = 1 GOTO 1180 
1010 IF Q = 2 GOTO 1250 
1020 HGR 

1030 HCOLOR= 7 

1040 HPLOT 5,5 

1050 HPLOT TO 5»155 

1060 HPLOT TO 245.155 

1070 HPLOT TO 245.5 

1080 HPLOT TO 5.5 

1090 FOR A - 17 TO 245 STEP 12 

1100 HPLOT A,155 TO A.157! NEXT 

1110 FOR A = 5 TO 245 STEP 48 

1120 HPLOT A,155 TO A.159! NEXT 

1130 FOR A = 155 TO 5 STEP - 7.5 

1140 HPLOT 2.A TO 5,A! NEXT 

1150 FOR A = 155 TO 5 STEP - 15 

1160 HPLOT 0,A TO 5,A! NEXT 

1170 RETURN 

UBO REM x LINE GRAPH x 
1181 X = U 

1185 HPLOT (5 -f 4.1 x V),155 - <A(X> x FRMT) 

1200 FOR A - (5 + 4.1 x U) TO 250 STEF* 4.1 

1210 B » A(X) x FRMT 

1215 IF B - 0 THEN 1225 

1220 HPLOT TO A.155 - B 

1225 X ” X + 1 ! IF X = R THEN 1340 

1230 NEXT 

1240 GOTO 1340 

1250 REM x BAR GRAPH x 

1251 X - V 

1260 FOR A = (7 + 4.1 x U) TO 250 STEP 4 

1270 B « A<X) x FRMT 

1275 IF B » 0 THEN 1310 

1280 HPLOT A.155 - B TO A.155 

1290 HPLOT A + 1.155 - B TO A + 1,155 

1300 HPLOT A - 1.155 - B TO A - 1,155 

1310 X = X + 1! IF X = R THEN 1340 

1320 NEXT 

1340 UTAB 21! PRINT “0 “J SPC< 5)J“1 "J 5PC< 5)!"2 "! SPC< 5)!"3 "! SPC< 

5)!"4 "J SPC< 5)J"5 " 

Listing continued. 


Extra Special! 

D.B. Master 

; 

^/EC^ 

$151.95 

| All Programs On Disk | 

LIST PRICE $29.95 

• 0UR PRICE$22.16 

Spider Raid 

Canyon Climber 

Lunar Leeper 

Castle Wolfenstein 

Pesi Patrol 

Spy’s Demìse 

Succession 

Free Fall ì 

Warp Destroyer 

Sea Fox ; 

Beer Run 

Hard Hat Noah 

Apple Panie 

Escape from Rungistan 

LIST PRICE $34.95 

• OUR PRICE$25.86 

Star Maze 

Kabul Spy 

Zargs 

Deadly Secrets 

Bandits 

Tra nsyl vania j 

Cannonball Blitz 

Crisis Mountain j. 

Choplitter 

Mask of thè Sun ! 

Hi-Res #4 

Frogger 

Knight of Diamonds 

LIST PRICE $39.95 

• OUR PRICE$29.56 

Zork 1. 2, or 3 

S.E.U I.S. 

Star Cross 

Cytron Masters 

Type Attack 

Galactic Gladiators 

Biade of Blackpool 

Ultima 

Rendezvous 

Aztec Adventure 


LIST OURS 

Arcade Machine. 

.59.95- 44.36 

Bag of Tricks. 

.39.95 - 29.56 

D.B. Utility Pak 1 or 2 

.99.00- 73.26 

Dead li ne. 

. 49.95 - 36.96 

Executive Secretary. 

. 250.00 - 184.96 

General Manager 2.0 

. 229.95- 170.16 

Graphics Magician . 

.59.95- 44.36 

Home Accountant 

.74.95 - 55.46 

Lisa Ed. System. 

.119.95- 88.76 

Logo (Terrapin) . 

.149.95- 119.96 

Maxell Disks (10).... 

. 55.00- 31.00 

Multiplan . 

.275.00- 203.49 

Nibbles Away II. 

. 69.95 - 51.76 

Screenwriter II. 

.129.95- 96.16 

Screenwriter Pro 

.199.95- 147.96 

SnooperTroops 1 or 2 

.44.95- 33.26 

Super Text 40/56/70 . 

. 125.00- 92.49 

System Saver Fan 

. 89.95- 76.46 

TascCompiler. 

.175.00- 129.49 

Ultima II. 
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. 49.95- 34.96 

D.B.Stat Pak. 
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Replay Card. 
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.125.00- 90.49 

Time Zone. 

.99.95- 71.96 
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by averaging it over a 12-month period 
and then finding its ratio to thè 
12-month average a year ago. Wright 
really goes into how this is done and 
why—I recommend his article if you 
can stili find a copy. 

After reading thè article, I immedi- 
ately entered thè program into my 
TRS-80. Wow! I could make business 
projections just like thè big boys. Was I 
ever proud. I couldn’t wait for some- 
one to ask thè big question—I was 
ready. I had my own practical exam- 
ple of computing power. 

Well, about this time I discovered 
thè Apple II with its high-resolution 
graphics, color and sound. If I had an 
Apple, I was sure I could enter thè 
world of big-time business computing. 
I just had to have one. 

With just a little financial manipu- 
lation (mortgage thè house, auction off 
thè car, sell thè kids into slavery), I was 
able to make my wish come true. 
Imagine my disappointment when I 
discovered that my favorite (and only) 
business program was not compatible 
with my shiny new Apple II. 

Not only were thè graphics not at all 
compatible (I wouldn’t have expected 
them to be), but thè Apple II was using 


1) ENTER DATA 

2) SAVE DATA 

3) RAW DATA TABLE 

4) 3MMA DATA TABLE 

5) PRESSURE DATA TABLE 

6) PLOT CURVE 

7) PLOT BAR GRAPH 

8) EDIT RAW DATA 

ENTER NUMBER ■ 


an entirely different language. The 
Apple would not recognize commands 
like CLS, and I think I heard it snicker 
when I tried Level I shorthand com¬ 
mands like F.I = 1T0E:G0S.95. It 
was beginning to look as though I 
would have to make a choice. Find 
another program, or rewrite this one. 

I couldn t find another program. 

In rewriting thè program for my 
Apple II, I made a few changes to 
make it fit my System and my needs. 
The major changes are: 

1. To accommodate thè Apple s 
smaller 40-column screen width, I re- 
duced thè overall period from ten years 
to five years. 

2. My memory was no longer limit- 
ed to 4K so I didn t try to be highly effi- 
cient with my coding. 

3. I now had a disk System to load 
and save my data, so I used disk com¬ 
mands instead of cassette tape com- 


Figure 1. 

This program is menu driven. By selecting a 
number and pressing return , you can enter 
data, save data or display it as either tables 
or graphs. 


mands as in thè originai program. 

4. I use a three-month instead of a 
12-month moving average to smooth 
my raw data. This gives me better res¬ 
olution for individuai months and 
quarters, which are thè main periods 
of interest to me. 

5. Tve included an automatic scal- 
ing routine that calculates thè maxi¬ 
mum and minimum values of thè data 
and adjusts thè graph accordingly. 

6. I take advantage of thè Apples 
high-resolution graphics, but not its col- 
or and sound. I thought of using differ¬ 
ent colors for different kinds of data but 
decided against it and use white only. 

When you run thè program, thè 
main menu will appear on your 
screen. Item 1 (ENTER DATA) allows 
you to enter your data from thè key- 
board or from a disk. If you choose 
keyboard entry, you enter thè title of 
your data, thè first year of thè series, 
and thè number of months your data 
covers. You can then enter your data 
for each month, a month at a time. 
When thè last month’s data is entered, 
thè program will return you to thè 
main menu. 

The data you just entered can be 
saved by choosing item 2 (SAVE 


Listing continued. 


1345 REM * PRINT MAX AND MIN * 

1347 IF U ■ 0 THEN VTAB 22t GOTO 855 
1350 UT AB 221 PRINT "MAX♦="» U,"MIN , = " J W 
1360 POKE 34 ,23 
1370 PRINT 

1380 INPUT "PRESS RETURN TO CONTINUE" i Pi 

1390 TEXT t GOTO 10 

1400 TEXT 

1410 HOME : END 

1420 REM * DISK BADE * 

1421 HOME 

1430 Di * ""i REM CTRL-D 

1440 PRINT DÌ"NQMQNC,I,0"♦ HOME 

1450 PRINT Di \ "OPEN"» Wi 

146 0 PRINT Di ?"DELETE"J W$ 

147 0 PRINT Di :"OPEN" i Ni 
1480 PRINT DiJ"URITE"}Wi 
1490 PRINT (R - 1) 

1500 PRINT E 

1510 FOR X = fl TO (R - 1) 

1520 PRINT E:(X> 

1530 NEXT X 

1540 PRINT DÌ"CL0SE"\Wi 

1550 GOTO 10 

1560 REM * DISK LOAD * 

1570 PRINT 

1580 INPUT "TITLE? "?Wi 
1590 Di * REM CTRL-D 

1600 PRINT DÌ"NOMONC,I,0"J HOME 
1610 PRINT D$;"GPEN"JW$ 

1620 PRINT Di »"READ"\Wi 

1630 INPUT Q 

1640 INPUT E 

1650 FOR X = 0 TO Q 

1660 R = Q + 1 

1670 INPUT B < X ) 

1680 NEXT X 

1690 PRINT Di}"CLOSE"\Wi 

1691 GOSUEi 2000 
1695 GOSUB 610 


1700 GOTO 10 

1800 REM * EDIT DATA * 

1810 U - Ot GOSUB 2000 
1815 GOSUB 610 
1820 POKE 34,20 
1830 HOME 

1840 PRINT "TYPE MONTH (1-12) , YEAR " 

1845 PRINT "TYPE 0,0 TO RETURN TO MENU" 

1850 INPUT MI,Y1 

1855 IF MI = 0 THEN TEXT \ GOTO 10 

1857 IF Y1 < E OR Y1 > (E + 4> THEN 1900 

1858 IF MI < 0 OR MI > 12 THEN 1900 

1860 E2 - (MI - 1) + <12 * (Y1 - E)) 

1870 HOME 

1880 PRINT "CHANGE FROMJ"{A(E2) 

1885 INPUT "TO ♦"}ND 
1890 A < E2) » ND 

1895 IF E2 > (R - 1) THEN R « E2 1 
1900 TEXT 

1905 FOR RD = 0 TO 59SB<RD) » A(RD)♦ NEXT 

1910 GOTO 1800 

2000 REM * GET RAW DATA * 

2010 FOR RD - 0 TO 591A < RD> = B(RD)» NEXT 
2020 RETURN 

3000 REM * GET 3MMA DATA * 

3010 FOR MA » 0 TO 59JA(MA) « C(MA)J NEXT 
3020 RETURN 

5000 REM * CALCOLATE 3MMA * 

5010 Y » 1 

5020 FOR X = 0 TO R - 3 

5030 C < Y ) = INT (<B(X) + B(X + 1) + B(X + 2)) / 3) 

5040 Y » Y + li NEXT 

6000 REM * CALCULATE PRESSURE * 

6010 FOR Y = 13 TO R 

6020 D<Y) = INT < INT <(C(Y) / C(Y - 12)) * 1000 ) / 10 ) 
6025 NEXT Y 
6030 RETURN 

6050 REM * GET PRESSURE DATA * 

6060 FOR FR = 0 TO 59JA<PR> = D(PR)Ì NEXT 
6070 RETURN 
3 
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DATA). It will be saved in a file using 
thè name you specified when you orig- 
inally entered it. 

Item 3 (RAW DATA TABLE), item 
4 (3MMA DATA TABLE) and item 5 
(PRESSURE DATA TABLE) will all 
display data in tabular form as indicat- 
ed. Item 6 (PLOT CURVE) and item 7 
(PLOT BAR GRAPH) will draw a line 
graph or a bar graph of thè last data 
table that was displayed. 

Item 8 (EDIT RAW DATA) is used 
to add data on a month by month ba- 
sis, or to correct errors. 

Converting this program from its 
originai shorthand Basic to Applesoft 
Basic was a much bigger project than I 
had anticipated. I learned a lot about 
programming and I think it was worth 
thè effort. Fve sprinkled thè program 
listing liberally with REM statements 
to make it easier for you to follow (or 
rewrite). I hope thè program is as use- 
ful to you as it is..to me. ■ 


INTRA'S PSIO Closcs 
THE GAP BETWEEN 
ASCII & BAUDOT 



Homputer 

101 W. 31 st Street 
I New York, N.Y. 10001 
J (212)947-5533 
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MACHINE LANGUAGE SPEED 
WHERE IT COUNTS... 

IN TOUR PROGRAM! 


For thè first time, Amper-Magic makes It easy for people who don’t know 
machine language to use its power! Now you can attach stick, finished machine 
language routines to your Applesoft programs in seconds! And interface them 
by name, not by address! 

You simply givo each routine a name of your choice, perform thè append pro¬ 
cedure once at about 15 seconds per routine, and thè machine language becomes a 
permanent part of your BASIC program. (Of course, you can remove it if you want to.) 

Up to 255 relocatable machine language routines can be attached to a BASIC 
program and then called by name. We supply some 20 routines on this disk. More 
can be entered from magazines. And more library disks are in thè works. 

These routines and more can be attached and accessed easily. For example, 
to allow thè typing of commas and colons in a responso (not normally allowed in 
Applesoft), you just attach thè Input Anything routine and put this line in your program: 

xxx PRINT “PLEASEENTER THE DATE.”; : & INPUT,DATE$ 

&■ MAGIC makes It Easy to be Fast & Flexible! 

PRICE: $75 


Some routines on this disk are: 

Binary file info 
Delete array 
Disassemble memory 
Dump variables 
Find substring 
Get 2-byte values 
Gosubto variable 
Goto to variable 
Hex memory dump 
Input anything 
Move memory 
Multiple poke decimai 
Multiple poke hex 
Print w/o word break 
Restore special data 
Speed up Applesoft 
Speed restore 
Store 2-byte values 
Swap variables 


&-Magìc and Amper-Magic are trademarks of Anthro-Digital, Ine. 
Applesoft is a trademark of Apple Computer, Ine. 


413 - 448-8278 


Anthro - Digital Software 
P.O. Box 1385 
Pittsfield, MA 01202 

The People - Computers Connection 
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Graphics 


Getting Higher 
Graphics 


Inadequate piote or charte driving you to a 
mainframe? Hold on.. .here’s an assembly-language 
program you can cali from Basic to simulate a hi-res 
screen with outetanding graphics. 


T he Apple II computer connected 
with an inexpensive mono- 
chrome video monitor can produce 
graphic images on an array of 280 by 
192 pixels. This capability serves many 
purposes including plotting graphs and 
creating animated games. ì use my Ap¬ 
ple primarily for scientific calcula- 
tions, and so I value thè ability to plot 
simple graphs of data or functions on 
thè screen. Adding a graphics printer 
(in my case an Apple Silentype thermal 
printer) increases thè utility of Apple 
graphics, since permanent records of 
plots and graphs are very often neces- 
sary. The inexpensive Silentype can 
print rather detailed images. 

Sometimes, however, thè Apple 
280 x 192 display is inadequate. More 
pixels are needed to render intelligible 
a more detailed plot or chart. Not 
much can be done about thè video 
screen (using only software). It is easy 
to write thè software to “draw” images 
in a selected block of memory and sub- 
sequently print thè finished result with 
a graphics printer. The inability to 
view thè image before you print it out 
is a disadvantage, but not a severe one. 

I allocated about 20,000 bytes of 
memory for a graphics Storage area. 
This size allowed me to create bit- 
mapped images on an approximately 
400 x 400 array. The square array is a 
flexible format for graphs; printouts on 
my Silentype fit nicely on an 8.5 by 
11-inch page, and thè image need not 
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by Paul Schubert 

be printed sideways to have decent- 
sized margins. 

These and other considerations re- 
sulted in thè creation of an assembly- 
language program consisting of rou- 
tines to be called from Applesoft Basic. 
These routines let me clear thè graph¬ 
ics Storage area, draw lines, plot 
points, and finally to print thè results 
on my Silentype Printer. The number 
of pixels along thè X axis is 400 (0 to 
399) and 399 (0 to 398) along thè Y 
axis. The graphics memory area begins 
at thè start of Apples high resolution 
page two (address 16384) and extends 
through address 36333. This is 2067 
bytes short of thè start of thè disk oper- 
ating System, and leaves ampie room 
for thè graphics routines which start at 
36334 (8DEE hexadecimal). 

First, let me give some examples 
that show how thè program is used in 
conjunction with Applesoft Basic. This 
is followed by a description of thè vari- 
ous routines in thè assembly-language 
listing. Finally, suggestions for further 
work are presented. 

Scribbling 

First we’ll consider a simple pro¬ 
gram which draws connected line seg- 
ments with random start and end 
points. It’s assumed that thè assembly- 
language routines have been BLoaded 
into memory, and that thè printer has 
been initialized and set for thè desired 


density. Usually maximum density 
gives thè best results. Listing 1 shows 
thè Basic routine Scribble. The first 
variables defined in thè program are 
thè integer values for thè start-of-line 
coordinates X0%,Y0% and thè end- 
of-line coordinates XI%,Y1%. These 
variables must always be defined in 
thè order shown and before any others, 
since thè line and point drawing rou¬ 
tines look at thè first four numbers in 
thè Basic program’s list of variables. 
Therefore, when using these routines, 
it’s a good idea to define X0%, Y0%, 
XI %, and Y1 % right at thè outset, as 
in line 10. 

In line 20, thè clear memory routine 
is called at address 37138. This sets 
each bit in thè graphics Storage area to 
zero. Line 30 sets up thè coordinates 
for thè first line to be drawn. The ran¬ 
dom-number function yields numbers 
between 0 and 1. These are scaled to 
give X coordinates between 0 and 399 
and Y coordinates between 0 and 398, 
which is done to keep thè line segments 
entirely inside thè picture area. How¬ 
ever, I should point out that there is no 
danger of writing outside of thè graph¬ 
ics Storage area and possibly damaging 
another program. The line and point 
plotting routines check, on a point-by- 
point basis, to make certain that no 
point is “plotted” if X or Y is out of 
bounds. Line 40 calls thè line-drawing 
routine. 

Lines 50 through 65 draw in 199 
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5 REM *********SCRIBBLE*****-**** 

10 X0V = 0:V0V = 0:X1V = 0:Y1V « 0: REM INITIALIZE PLOTTING 

uariables, 

15 REM FIRST » COLL THE GRAPHICS MEMORV CLEAR ROUTINE FOR H CLEAN 

SLfìTE. 

20 CALL 37133 

25 REM NEXT, SET THE COOROINOTES FOR THE FIRST LINE. 

30 X0V = 399 * RND <1>:Y0V = 39S * RND <1>:X1V - 399 * RND <1>:Y1 
V = 393 * RND < 1 > 

35 REM NON, DRfiW THE FIRST LINE. X0V AND Y9V ARE SET EQUAL TO XIV 
AND V15S AT THE END OF THE OPERATION. 

40 COLL 36392 

45 REM FINALLY, DRAM 199 MORE LINES CONNECTED WITH THE FIRST. 

50 FOR I = 1 TO 199 

55 XIV. = 399 * RND (1):YÌV = 393 * RND < 1 >: REM NOTE THAT ME NEED 
ONLV CHANGE XIV AND V1V TO DRAM CONTINUED LINE SEGMENTS. 

60 CALL 36392: REM CALL LINE DRAM ROUTINE. 

65 NEXT I 

70 CALL 37196: REM PRINT OUT THE IMAGE ON THE SILENTVPE. 

75 END 



Program UsHng l. 
Program to generate a pattern oj 
connected line segmenti 
with rondo tri coordinates for vertices. 


more line segments. Each successive 
one starts at its predecessor s end point. 
It’s important to realize that when thè 
line-drawing subroutine has complet- 
ed a line, thè starting-point variables 
X0% and Y0% have been set equal to 
thè end-point variables XI % and 
Y1 % . This makes drawing connected 
line segments simply a matter of suc¬ 
cessive changes in thè end-point coor¬ 
dinates XI % and Yl% between calls 
to thè line drawing routine. 

Line 70 calls thè Silentype graphics 
printout routine at address 37196. A 
sample run of Scribble is shown in 
Figure 1. 

Drawing 

Figure 2 shows a drawing of a 
sphere made by plotting thè planar 
projections of various rotational posi- 
tions of a couple of circles in three di- 
mensions. The quality of thè result, 
while not in thè same league as that 
which could be had with a pen plotter, 
is nevertheless pleasing. The Basic pro¬ 
gram that generated this sphere is 
quite straightforward and I chose not 
to include it here. 

Plotting 

Listing 2 is a simple program that 
plots thè functions of two variables in 
thè form of a perspective drawing. The 
function of interest is specified as a 
subroutine starting at line 10. In thè 
present example, I have chosen to plot 

Z - sin(X - 27r)sin(Y - 2tt) + 1 

The program proper begins at line 100 
with thè usuai variable definitions to be 
passed to thè assembly-language plot 
routines. This is followed by thè clear 
screen command in line 110. Next, line 
120 dimensions two arrays which are 
used to store maximum and minimum 
function values for use in thè hidden- 
line routine which starts at line 200. 
After defining some constants in lines 
130 and 135, thè program prompts thè 
user to specify thè maximum values to 
be used by thè independent variables X 
and Y, and thè dependent variable Z. 
The minimum values for each of these 
variables is assumed to be 0. In thè 
present example, XMAX and YMAX 
are set equal to 2 ti, and ZMAX is set 
equal to 2. 

Lines 200 through 360 comprise a 
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rudimentary hidden-line plot routine 
in which thè line-draw routine is 
called at line 330. Figure 2 shows thè 
finished result printed on thè Silen¬ 
type. A second example of this type of 
plot is shown in Figure 3. The function 
used was of thè generai form 

Z = ((sinX)/X) 2 ((sinY)/Y) 2 

which yields Z values proportional to 
thè far-field intensity pattern of light 
diffracted from a square aperture. 


Graphics Routines OverView 

The assembler listing for thè rou¬ 
tines used in thè examples is shown in 
Listing 3. There are basically five parts 
to thè program. First, several parame- 
ters are defined in lines 170-840. These 
include indices for variables and con¬ 
stants (to be described shortly), thè 
constants themselves, various addresses, 
and an eight-byte table used for setting 
individuai bits in a selected byte. . 

Next comes thè line-drawing rou¬ 
tine, a 6502 version of an algorithm 
written in Basic by Mike Higgins 








Prometheus 


The Prometheus family of external 
Winchester Systems were designed 
to put thè power of hard disk data 
Storage within thè reach of all 
Systems owners—without sacri- 
ficing performance, quality or 
reliability. All Prometheus Systems 
feature: 

• Complete-Ready-to-run 

• One year limited warranty 

(parts/labor) , 

• Error code correction / CRC 
generation / Verification 

• Automatic micro-processor self 
test on power up. 12,000 hours 
mean time between failure 


• Error code-LE D-alerts 
operator of System fault 

• Expandable to 40 M Bytes 

In addition each Prometheus System 
includes DOS+ 4.0afor thè TRS80® 
Model III, and patches for Apple 
DOS, CP/M, Pascal, and MSDOS; 
and CP/M86 for thè IBM Personal 



• Commercial power supply with 
automatic current limit and 
overload protection 

• International AC input (All units 
easily accept 100, 120, 220 or 240 
VAC, 47-440 HZ) Corcom RFI filter 
with transient suppression 


Computer. 

PROMETHEUS -5 $1,495.00 

Also available 10,15 & 20 megabytes 
hard disk Systems for Apple, TRS80 
& IBM-PC systems. 


Cali or write: 

Worldwide Data Systems, Ine. 

17321 El Camino Reai 
Houston, Texas 77058 
713/488-8022 
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1 REM *********CDNTOUR PLOT******-*** 

5 GOTO 100 

16 Z = SIN <X - fO * SIN <V - A> + 1 
20 RETURN 

100 X0X = 8:Y0X = 0sXU - O:VI': = 0 
110 CALL 37133: REM CLEAR SCREEN 
120 DIM MAX<490>,MIX<400> 

130 PX = 250:PY = 150:PZ = 245:P5 = .5 

135 PI = 3.14159:A = 2 * PI: REM DEFINE CQNSTANTS FOR FUNCTION. 

140 HOME : INPUT H XMAX= ";XF 

145 INPUT “YMAX- “;VF 

150 INPUT "ZHAX= %ZF 

200 REM HIDDEN-LIHE PLOT ROUTINE. 

210 FOR J = 0 TO 400:MAX<J> = 0:MIX<J) = 393: NEXT 

220 FOR J = 0 TO 150 STEP 2 

221 X = 0:V = J * VF ✓ PV: GOSUB 18 

222 Z * Z * PZ / ZFsVOX = .J + INT <2 + P5>:X0X = J 
230 FOR I = 8 TO 258 

240 Q = I + J 

250 X = I * XF / PX 

260 XIX. = Q 

270 GOSUB 18 

280 Z = Z * PZ ✓ ZF 

290 Y1X = INT <J + Z + P5> 

380 IF Y1X < MAX<Q> ANO Y1X > MIX<Q> THEN X0X = XIX:Y0X = Y1X: GOTO 350 

318 IF V1X > MAX(Q) THEN MAX<Q> = Y1X 

320 IF YIX < MIX<Q> THEN MIXCS) = YIX 

338 CALL 36392: REM PLOT X6X,Y0X TO XIX,VIX 

358 NEXT I 

368 NEXT J 

370 CflLL 37196: REM CALL THE SILENTVPE GRAPHICS PRINT ROUTINE 
338 END 



Program listing 3. Assembly listing of graphics routines described in thè text. 

0010 ; LINE AND POINT PLGTTING AND SILENTVPE 
0020 GRAPHICS DUMP FOR A 400X399-PIXEL PRRAV. 

0830 ; 

0940 ; BV PAUL SCHUBERT 

0050 ; 1982 

0060 > 

6080 ì 

0090 ; DEFINE INDICES AND SET ASIDE STORAGE 

0100 ; SPACE FOR UPRIABLES AND CONSTANTS. Lfe tf ng 3 con tinued. 


Program listing 2. 

Program to drau) perspective plots 
offunctions of two variables. 


(Byte, August 1981, p. 414). This oc- 
cupies lines 940-2760.1 refer thè read- 
er to thè article by Higgins for details 
on this line-drawing technique. The 
variable names used here are thè same 
ones that Higgins used. 

The third major section (lines 2780- 
3780) of thè program is a collection of 
16-bit routines that are used extensive- 
ly by thè previous section. Because 
you re dealing with coordinates span- 
ning values greater than 255, you must 
use a two-byte representation for thè 
numbers in thè program. A description 
of these routines is given later. 

Lines 4220-5260 contain thè fourth 
section of thè program. Here thè coor¬ 
dinates generated by thè line-drawing 
routine are taken and thè appropriate 
bit in thè graphics Storage area is set 
according to thè bit-mapping scheme 
to be described below. 

After a short section of code to clear 
thè graphics Storage area (lines 5280- 
5550) Comes thè final section of thè 
program: thè Silentype graphics dump 
routine. Let’s examine some parts of 
this program in more detail. 

Sixteen-Bit Calculations 

As noted above, thè line-drawing 
routine uses 16-bit numbers in its coor¬ 
dinate calculations. One approach to 
deal with frequently needed 16-bit cal¬ 
culations on an 8-bit machine is to im- 
plement an interpreter. To avoid thè 
interpretation time, I wrote a collec¬ 
tion of subroutines which operate on 
thè variables specified by thè contents 
of thè two 6502 index registers at thè 
time of thè subroutine cali. 

For instance, thè indices for thè 
variables NI and DI are specified in 
lines 260 and 270 of Listing 3. To add 
these two variables, I would load thè 
processori X and Y index registers with 
thè indices for NI and DI and cali thè 
subroutine XPLUSY (line 2880). This 
subroutine accesses and adds thè two 
variables of interest by using thè absp- 
lute indexed address mode with base 
address VARSTO. The 16-bit result is 
stored in a couple of bytes set aside as a 
sort of double-precision accumulata 
(DPACC). 

The sign and zero bits in thè 6502 
status regista are set according to thè 
16-bit result. That is, a negative 16-bit 
sum would yield a 1 for thè sign bit, 
and a 16-bit sum of zero would cause 
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thè zero bit to be set. If I wished to 
store NI + DI at thè memory position 
reserved for yet a third variable, I 
would invoke die subroutine ACCTOX, 
which replaces thè variable indexed in 
thè X register with thè current value in 
DPACC. 

In addition to these two subrou- 
tines, others use thè same indexing 
scheme for accessing variables and 
constants. These include: XMINUY, 
which places thè difference of thè two 
indexed quantities in DPACC; SIGNX, 
which sets thè sign and zero bits in thè 
processor status register appropriate 
for thè 16-bit quantity indexed by thè X 
register; and INCREX and DECREX, 
which increment and decrement thè 
indexed quantity and set thè sign and 
zero bits after thè operation. 

In addition to ACCTOX described 
above, there are two further move rou¬ 
tines, XTOY and XTOPTR. The for- 
mer is self-explanatory and thè latter is 
useful for transferring indexed vari¬ 
ables to zero-page addresses 6 and 7 
(MAPPTR) for use in indirect address- 
ing. This brief set of routines served my 
needs nicely for thè software described 
here. Clearly, thè set can easily be ex- 
tended for other purposes. 

Two features of this indexing ap- 
proach make it useful for translating 
simple Basic programs into assembly 
language. First, thè indexing itself al- 
lows thè user to deal with named vari¬ 
ables in a simple way. Second, because 
many of thè routines return thè zero 
and sign bits in thè status register ac- 
cording to thè 16-bit result, it’s fairly 
simple to implement For...Next loops. 
This latter capability was handy for 
thè Silentype printer driver described 
below. 

Point-Plotting Routine 

The heart of this graphics package is 
thè subroutine that takes thè coordi- 
nates generated by thè line-drawing 
routine and sets thè appropriate bit in 
thè graphics Storage area. Lines 4240- 
5260 in Listing 3 show this code titled 
DPlot. Each time a new pixel is added 
to a line being drawn, thè coordinates 
of that pixel are used by DPlot to plot 
thè proper bit. 

First, in lines 4240-4410, thè coordi¬ 
nates, stored in thè indexed variables 
X0 and Y0, are checked to see if they 
fall within 0-399 for X0 and 0-398 for 


Listing continued. 

0110 ; PLSGj 



ASSIGN ADDRESSES FOR APPLESOFT 


0120 ; STORT-OF-UARIOBLES POINTER# A 

2ER0- 


@130 * PAGE 

IHAGE ADDRESS POINTER <MAPPTR># ! 


0140 # « 16-BIT ACCUMULAT0R <DPACC>, 

AND A 


0150 # MASK 
0160 ; 

TABLE CBITMAP). 



0178 NUMUAR 
0188 ; 

.DE 12 



0190 

,BA 36334 



0280 i STORAGE SPACE FOR VARIABLES. 



9210 ; 



SDEE- 

0220 VARST0 
0230 i 

.OS NUMVAR+NUMVAR 



0240 -, INDICES FOR VARIABLES. 



0258 i 

0260 NI 

.DE 0 



9270 DI 

.DE 2 



0280 D2 

-DE 4 



0290 D3 

• DE 6 



0300 SI 

.DE 8 



0310 S2 

.DE 1© 



0320 01 

.DE 12 



0330 02 

.DE 14 



0340 X0 

.DE 16 



0350 V0 

.DE 18 



0360 XI 

.DE 20 



0370 VI 

8380 ; 

.DE 22 



0390 i STORED CONSTANTS. 



0400 ; 



8 E86- 00 00 

0410 

.BY 3 3 


3E0S- 00 01 

0428 

.BV 0 1 


8E0A- FF FF 

0430 

.BV $FF $FF 


8E0C- 01 8E 

0440 

.BV $01 $8E 


8E0E- 01 8F 

0450 

.BV $01 $8F 


SE10- 40 00 

0460 

.BV $40 $00 


8E12- 8D ED 

0470 

-BV $80 $ED 


SEM- 00 07 

0488 

.BV 00 07 


8E16- 8D EE 

0490 

.BV $8D $EE 


SE18- 41 5E 

0500 

-BV $41 $5E 


8E1P- 01 5E 

0510 

-BV $01 $5E 


SE1C- 00 31 

0520 

0530 i 

.BV $00 $31 



0540 i INDICES FOR CONSTANTS. 



0550 f 

0560 C0 

.DE NUHVAR+NUHVAR 



0570 CI 

-DE C0+2 



0580 CM1 

.DE Cl+2 

Listing 3 continued. 


0530 C398 

.DE CM1+2 
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THE NEW ANCHORPAD™ 
SECURITY SYSTEM 

Keeps Your Desk-Top Computer Where It Belongs — 
Permanently On Your Desk! 

• Secures each component part against theft. 

• Swivels a full 360° for easy access. 

• Allows ventilation of components. 

• Protects memory boards from theft. 

• Unlocks quickly and easily for Service or relocation. 

• Adaptable to any desk-top computer. 

If your computer is stolen you lose: valuabie programa, software 
and Irreplaceable timo. DON'T BECOME A STATISTIC. 95% of 
our customers don't come to us until after they have been 
robbed. Don’t wait! rr-9* 

Eauiomcnt EnYitioamcnts/7%7 

P.0.BoX344:M35lllia.N.t1.O3CH31 603 883-9960 


7 4 >q' JS ^ Q IV : ? y l fumiturc and Eauipment fbrTT v( 
^/5 j Working and Lcaming Environmcnte>\ 


Circle 62 on Reader Service card. 


INVESTMENT 

MANAGING 


STOCK MANAGER. 

0PTI0NS-80. 

BOND MANAGER. 

Analyse investment 
return. User friendly. 
Commissione, risk and 
taxes incl. Graphs. 
Printouts. Record to 
disk. With complete 
Manuals. *125 each 
(Mass res add 57. tax) 
Package discounts. 
M/C Se Visa. 

Free brochure. 
0PTI0NS-80, Box 471-1 
Concord, MA 01742. 


Stocks.Bonds 
Listed Options 
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Sales 

Opportunity 

A few select territories available 

Join a fast growing company in- 
volved in thè microcomputer indus- 
try as a direct salesman. Sales in- 
volve our wide selection of books, 
five publications and software. We 
are looking for a non-smoking in¬ 
dividuai with a good sales back¬ 
ground and a basic understanding 
of microcomputers. An excellent 
career awaits thè person who wants 
to be “on his own.” It will be thè 
responsibility of our direct sales¬ 
man to become familiar with all 
makes of computers and their sales 
outlets, amateur radio and elec- 
tronic Stores, book Stores, and 
other outlets, for our products in 
your given territory. We will also 
add other lines as they become 
available. Arrangements are being 
made to coordinate efforts with 
some other firms in thè area, in- 
cluding a major printer manufac- 
turer. We offer an excellent growth 
potential with a highly motivated, 
young corporation. If you or some- 
one you know is interested in thè 
opportunities available at Wayne 
Green Ine., please submit your 
background in detail, including 
sales experience, recent work 
history, knowledge of thè micro¬ 
computing industry, educational 
background and references to: 


Sales Manager 
Wayne Green, Ine. 
Peterborough, NH 03458 


All replies will be immediately ac- 
knowledged and held in thè strictest 
confidence. 


WAYNE GREEN, INC. 
(C-02) Pine Street 
Peterborough, N.H. 03458 
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0800 C399 

.DE C398+2 




0610 CI6384 

.DE C399+2 ;STORI ODOR 0F IMRGE MEMORY. 




9620 C36333 

-0E CI6384+2 ;END 0DDR 0F BIT-M0PPED MEMORY. 




0630 C7 


.DE C36333+2 




0640 C36334 

.DE C7+2 




0656 CI6734 

.DE C36334+2 




0660 C350 

.DE CI6734+2 




0670 C49 

.DE C350+2 




0680 


i 




0690 U0RPTR 

.DE $69 jBOSIC START OF UPRIPBLES PTR. 




0708 ; 






0710 M0PPTR 

.DE 6 ;POINTER TO START OF IM06E MEMORY. 




0720 ; 



SEIE- 08 

90 


0738 DP0CC 

.BV 0 8 ì 16-BIT OCCUMULOTOR. 




0740 ^ 






0750 \?BIT MPP T0BLE. 




0760 ; 



8E20- 01 



0770 BITH0P 

. BV 1 

8E21- 02 



0780 


.BY 2 

8E22- 04 



0790 


.BY 4 

8E23- 08 



0800 


.BV 8 

SE24- 10 



0810 


.BY 16 

8E25- 20 



0820 


.BY 32 

3E26- 40 



0830 


.BY 64 

8E27- 80 



0840 


.BY 128 




0850 ; 
0860 ; 

6502 

OSSEHBLY-LONGUPGE UERSION OF LINE- 




0870 ; 

DRPHING ROUTINE BV MIKE HI6GINS, BYTE» 




0880 i 

QUGUST 1981, P0GE 414. BEGIN BY RE- 




0890 j 

TRIEUING THE B0SIC URRIPBLES X0,Y0,X1, 




0300 ; 

0N0 VI. 




0910 ; 



8E28- 20 

00 

30 

0928 LIDRRH 

JSR GETBPS 




0930 ; 






0940 ; 

D1=X1-X0 




0950 j. 



8E2B- P2 

14 


0960 


LDX #X1 

8E2D- m 

10 


0970 


LDY #X@ 

8E2F- 20 

81 

3F 

0980 


JSR XMINUY 

8E32- 02 

02 


0990 


LDX #D1 

8E34- 20 

B0 

8F 

1000 
1010 i 


JSR OCCTOX 




1020 ; 

G2=V1-V0 

. 



1030 ; 



SE37- 02 

16 


1040 


LOX #Y1 

8E39- 00 

12 


1050 


LDY #Y0 

8E3B- 20 

81 

3F 

1060 


JSR XMINUY 

8E3E- 02 

04 


1070 


LDX #D2 

8E48- 28 

B0 

8F 

1080 


JSR OCCTOX 




109© ; 
1100 ; 
1110 ; 

S1 —0 

,82=1,01=1,02=0 

SE43- 02 

18 


1128 


LDX #C8 

8E45- 00 

08 


1130 


LDY #S1 

8E47- 28 

E3 

8F 

1140 


JSR XTOY 

8E40- 02 

10 


1156 


LDX #C1 

8E4C- 00 

00 


1168 


LDY #S2 

8E4E- 20 

E3 

8F 

1170 


JSR XTOY 

SE51— 02 

10 


1130 


LDX #C1 

8E53- 00 

0C 


1190 


LDY #P1 

8E55- 20 

E3 

3F 

1200 


JSR XTOY 

8E58- 02 

18 


1218 


LDX #C6 

SE5P- 00 

0E 


1220 


LDY #P2 

8E5C- 20 

E3 

8F 

1230 
1240 ; 


JSR XTOY 




1256 ; 

IF DI >=@ GOTO LABEL1 j 




1269 ì 



8E5F- 02 

02 


1270 


LDX #01 

3E61- 20 

02 

8F 

1280 


JSR 3IGNX 

3E64- 10 

13 


1298 
1308 ; 


BPL LABEL1 




1318 ; 
1320 ; 

01=- 

1 , 01 =- 01 . 

8E68- 02 

1C 


1330 


LDX #CM1 

SES8- 00 

00 


1348 


LDY #01 

8E60- 20 

E3 

8F 

1358 


JSR XTOY 

8E6D- 02 

13 


1368 


LDX #C8 

8E6F- 00 

02 


1370 


LDY #D1 

8E71- 20 

31 

8F 

1388 


JSR XMINUY 

8E74- 02 

02 


1396 


LDX #D1 

8E76- 28 

B0 

3F 

1400 
1410 ; 


JSR PCCTOX 




1420 * 

IF O2>=0 GOTO L0BEL2 




1436 ; 



SE78- 02 

04 


1440 L0BEL1 

LDX #02 

8E7B- 20 

02 

8F 

1450 


JSR SIGNX 

8E7E- 10 

13 


1460 
1470 ; 


BPL LPBEL2 




1480 j 
1490 ; 

D2=- 

D2, S2=-1 

SE80- 02 

13 


1500 


LOX #C0 

8E82- 00 

04 


1510 


LDY #D2 

8E84- 20 

31 

3F 

1520 


JSR XMINUY 

8E87- 02 

04 


1538 


LDX #D2 

8E33- 20 

B0 

3F 

1540 


JSR OCCTOX 

8E8C- 02 

1C 


1550 


LDX #CM1 

8E8E- 00 

00 


1560 


LDY #S2 

8E90- 20 

E3 

8F 

1570 
1530 j 


JSR XTOY 




1590 ; 

IF 01>=D2 GOTO L0BEL3 i 






Listing 3 continued. 
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MAKES BACK-UP COPIES OF PROTECTED SOFTWARE 
QUICKLY, EASILY, WITH JUST A PUSH OF A BUTTON. 



New software locking schemes have rendered even thè latest generation of 
copy programs virtually unusable. Locksmith™, Nibbles Away™ and other 
"Nibble copiers" require complicated parameter settings, much patience and 
great effort to use. More often than not, thè results are disappointing. WILD¬ 
CARD is different. Rather than copying disks track by track, WILDCARD 
ignores thè disk and any copy protection encryptedon it. Instead, WILDCARD 

takes a snapshot of memory in your Apple® Il 
Now you can make back-up copies 
of protected software with 
g thè push of a button 


Features 

■ Hardware copying device...push button operation 

■ Copies 48K memory resident software, 
most 64K software.* 

■ No Parameters are necessary. 

■ WILDCARD lives in any slot. 

■ WILDCARD is undetectable by software. 

■ Produces autobooting disk in 2 minutes. 

■ Copies become accessible for alterations. 

■ Copies are DOS 3.3 compatible. 

■ Simple menu driven software included. 


Software is not copy protected. System requirements: Apple II Plus with 64K and DOS 3.3. 
* Wildcard does not operate with CP/M" or other microprocessor based software. 


$129.95 direct from East Side Software Co., 344 E. 63 St., Suite 14-A, New York City 10021, 212/355-2860. 
Please include $3.00 for handling. Mail and phone orders may be charged to MasterCard and VISA. 

N.Y. State residents add sales tax. Dealer inquiries welcome. 

IMPORTANT NOTICE: The WILDCARD is offered for thè purpose of enabling you to make archivai copies only. 
Under thè Copyright Law you, as thè owner of a copy of a computer program, are entitled to make a new copy for 
archivai purposes only and thè WILDCARD will enable you to do so. The WILDCARD is offered for no other 
purpose and you are not permitted to utilize it for any other use, other than that specified. 

Apple II is a registered trademark of Apple Computer, Ine. CP/M is a registered trademark of Digital Research, Ine. Locksmith—trademark of 
Omega Microware, Ine. Nibbles Away—trademark of Computer: applications. 

Circle 215 on Reader Service card. 













Circle 220 on Reader Service card. 

What’s eating 
your Apple? 

Find out with Apple-Cillìn II™ 

If you use your Apple for your business or 
profession, you probably rely on it to save you 
time and money. You can ’t afford to guess 
whether it is working properly or not. Now you 
don’t have to guess. Now you can find out 
with Apple-Cillin II. 

Apple-Cillin II is thè comprehensive diagnostic 
System developed by XPS to check thè 
performance of your Apple II computer System. 
Apple-Cillin II contains 21 menu driven Utilities 
including tests for RAM memory, ROM 
memory, Language Cards, Memory Cards, 

DISK System, Drive Speed, Keyboard, Printer, 

CPU, Peripherals, Tape Ports, Monitors and 
more. These tests will thoroughly test thè 
operation of your Apple, and either identify a 
specific problem area or give your System a 
clean bill of health. You can even log thè test 
results to your printer for a permanent record. 

Apple-Cillin II works with any 48K Apple System 
equipped with one or more disk drives. 

To order Apple-Cillin II - and to receive 
information about our other products - Cali 
XPS Toll-Free: 1-800-233-7512. In Pennsylania: 
1-717-243-5373. 

Apple-Cillin II: $49.95. PA residents add 6% 

State Sales Tax. 


XPS, Ine. 

323 York Road 
Carlisle, PA 17013 

800-233-7512 

717-243-5373 


XPS 


Apple is a registered trademark of Apple Computer Ine. 
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1600 # 


8E93- 02 02 

1610 LQBEL2 LDX #D1 

8E95- 00 94 

1620 

LDV #02 

8E97- 20 81 8F 

1636 

JSR XMINUV 

3E90- 10 31 

1640 
1650 # 

BPL L0BEL3 


1660 ; 
1670 # 

N1=D1# 01-02# D2=N1# 31=01# 01=0 

SE9C- «2 82 

1680 

LDX #D1 

8E9E- 00 06 

1690 

LDV #N1 

SE00- 20 E3 8F 

1700 

JSR XTOV 

8E03- 02 04 

1710 

LDX #D2 

8E05- 00 02 

1720 

LDV #D1 

8E07- 20 E3 8F 

1730 

JSR XTOV 

8E00- 02 00 

1740 

LDX #N1 

8E0C- 00 04 

175© 

LDV #D2 

SEOE- 20 E3 8F 

1760 

JSR XTOV 

SEBI- 02 0C 

1770 

LDX #01 

SEB3- 00 08 

1780 

LDV #S1 

8EB5- 20 E3 8F 

1790 

JSR XTOV 

S3EB8- 02 18 

1800 

LDX #C0 

SEBO- 00 0C 

1810 

LDV #01 

8 EBC- 29 E3 8F 

1320 
1836 i 

JSR XTOV 


1840 # 
1856 # 

02=S2# S2=0 

SE8F- 02 00 

1860 

LDX #S2 

8EC1- 00 0E 

1870 

LDV #02 

SEC3- 29 E3 8F 

1380 

JSR XTOV 

8 EC6- 02 18 

1890 

LDX #C0 

SEC3- 00 00 

1300 

LDV #S2 

SECO- 20 E3 8F 

1910 
1920 ; 

JSR XTOV 


1930 ; 
1940 ; 

D3=Dl/2# Nl=l 

SECO- 02 02 

1950 L0BEL3 LDX #D1 

3ECF- 00 06 

I960 

LDV #03 

SEDI- 28 E3 8F 

1970 

JSR XTOV 

8ED4- 02 06 

1980 

LOX #03 

8 ED6- 5E EE 8D 

1990 

LSR UORSTO#X 

3E09- E8 

2000 

INX 

SEDO- 7E EE 8D 

2010 

ROR UQRSTO#X 

SEDO- 02 10 

2020 

LDX #C1 

8 EDF- 00 00 

2030 

LDV #N1 

3EE1- 20 E3 3F 

2048 
2050 s 

JSR XTOV 


2060 ; 
2070 ; 

COLL THE PLOT ROUTINE. 

3EE4- 28 37 90 

2080 LABEL4 JSR DPLGT 

2090 j 


2100 i 
2110 ; 

IF O1-NK0 THEN RETURN. 

8EE7- 02 02 

2120 

LDX #D1 

8EE9- 00 00 

2130 

LDV #N1 

3EE8- 20 3i 8F 

2140 

JSR XMINUV 

8 EEE- 10 0F 

2150 

BPL CONT 

8EF0- 00 02 

2168 

LDV #2 

8EF2- 02 16 

2170 

LDX #X0 

8EF4- 20 20 30 

2180 

JSR PUTBOK 

8EF7- 00 09 

2190 

LDV #9 

SEF9- 02 12 

2200 

LDX #V0 

8 EFB- 20 20 90 

2218 

JSR PUTBOK 

3EFE- 60 

2220 
2238 ; 

RTS 


2240 i 
2250 i 

X0=X0+01# V0=V0+O2 

8 EFF- 02 10 

2260 CONT LDX #X0 

8 F01- 06 0C 

2270 

LDV #01 

SF03- 20 60 8F 

2280 

JSR XPLUSV 

8F06- 02 10 

2290 

LDX #X0 

8F08- 20 B0 8F 

2300 

JSR OCCTOX 

8F0B- 02 12 

2318 

LDX #V0 

3F0D- 00 0E 

2320 

LDV #02 

8F0F- 20 66 8F 

2330 

JSR XPLUSV 

SF12- 02 12 

2340 

LDX #V0 

8F14- 20 B0 8F 

2350 
2360 i 

JSR OCCTOX 


2370 > 
2380 ; 

D3=D3+D2 • N1=N1+1 

8F17- 02 06 

2330 

LDX #D3 

SF19- 00 04 

2400 

LDV #D2 

8F1B- 20 60 8F 

2410 

JSR XPLUSV 

SFIE- 02 06 

2420 

LDX #D3 

8F20- 20 B0 8F 

2430 

JSR OCCTOX 

8F23- 02 00 

2440 

LDX #N1 

8F25- 20 BE 8F 

2450 
2460 ; 

JSR INCREX 


2470 ; 
2480 # 

IF D1-D3 > 0 60T0 L0BEL4. 

SF28- 02 06 

2490 

LDX #03 

8F20- 00 02 

2500 

LDV #D1 

SF2C- 20 81 8F 

2510 

JSR XMINUV 

8F2F- 38 B3 

2520 
2530 ; 

BMI L0BEL4 


2540 ; 
2550 ; 

D3=D3-D1#X0=X0+S1#V0=V0+S2# GOTO L0BEL4 

8F31- 02 06 

2560 

LOX #D3 

8F33- 00 02 

2570 

LDV #D1 

SF35- 20 81 8F 

2580 

JSR XMINUV 

8F38- 02 06 

2590 

LDX #03 

SF30- 20 B0 8F 

.2600 

JSR OCCTOX 

8F3D- 02 10 

.2610 

LOX #X0 

Listing 3 continued. 
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Clrcle 60 on Reader Service card. 


ATTEOTION 

FOREIGN COMPUTER 
STORES 

MAGAZINE DEALERS 

You bave a larga technical 
audience that speaks English and 
is in need of thè kind of micro- 
computer information thè Wayne 
Green Publications group provides. 

Provide your audience with thè 
magazine they need and make 
money at thè same time. For 
details on selling Microcom¬ 
puting, 80 MICRO, Desktop 
Computing, inCider and Wayne 
Green Books contact: 

SANDRA JOSEPH 
WORLD WIDE MEDIA 
386 PARK AVE. SOUTH 
NEW YORK, N.Y. 10016 
PHONE-(212) 686-1520 
TELEX-620430 


INTRA'S PSIO * 
AND SOFTERM 


Tum your APPLE into an intelligent file transfer terminal 
for accessing applications on hosts and time sharing 
systems. Supporting keyboard selectable transfer 
rates to 9.6 kbit/s ; thè * PROGRAMMABLE SERIAL 
I/O BOARD, when used with Softronics Inc.’s Softerm 
lets your APPLE emulate IBM’s 3101, DEC’s VT100, DG’s 
D-200, LSI's ADM-3A and ADM-5A, Hazeltine 1400 and 
1500, ADDS Regent, and TeleVideo 900 Series Terminals. 


PSIO Board.199” 

SOFTERM Software.150“ I 

300 Baud 103 LP Modem 245“ 

1200 Baud 202 LP Modem....295“ I 
1200 Baud 212 LP Modem.495“ 


Spccul 
10% Off 

wlt€N you buy 2 or more ìtcms 


Computer 


101 w. 31 st, N.y., N.y. ioooi 

(212)947-5533 




A unique experience for those who love a challenge 

SPITFIRE SIMULATOR... _ 

Fly a 360 mph Spitfire fighter • Pursue and attack 3-D target gS555i^SPR^M 
aircraft • Eight target types (Me 109, Fw 190, etc.) • Scores K ,> >._ 
for targets hit and successfu! mission completion I 4 

• Aerobatic (loops, rolls, stalls, etc.) ++ ... 

• AIRSIM-I pilotS: SPITFIRE SIMULATOR IBfo* 4 * J}' A 
can use AlRSlM-l scenery! +V;:' 


$40.00 < ^ 

Mass, residents 
add 5% sales fax. 
Overseas shipping 
add $3.00. For 
Apple II or 11+ with 
48 K RAM, Applesoft ROM 
or equivalent. One disk. 
Game paddles or joystick. 

See your dealer or 
contact usdirectfy. 


- ì'jy 


a | v | Minò Systems 

CbJ Cor pirati 

P.O.%%06 
Northamptpn.MA 01061 
. % (4131586-6463 


Apple is a Trademark of Apple Computer, Ine. 
AIRSIM is a Trademark of Mind Systems Corporation. 
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SF3F- A0 08 

2620 

LDV #S1 

8F41- 20 60 8F 

2630 

JSR XPLUSV 

SF44- A2 1@ 

2640 

LDX #X0 

8F46- 20 B0 SF 

2650 

JSR ACCTQX 

8F49- «2 12 

2660 

LDX #V0 

8F4B- m m 

2670 

LDV #S2 

*F4D- 28 60 8F 

2680 

JSR XPLUSV 

8F50- R2 12 

2690 

LDX #V0 

3F52- 28 B8 8F 

2700 

JSR ACCTOX 

8F55- D0 8D 

2710 

BNE LABEL4 

3F57- F0 8B 

2720 

BEQ LABEL4 


2730 


3F59- 28 00 98 

2740 PTORAH JSR GETBflS 

8F5C- 20 37 90 

2756 

JSR DPLOT 

8F5F- 60 

2760 

RTS 


2770 



2789 

C0LLECTI0N 0F SUBROUTINES T0 HPNOLE 


2790 

16-BIT ADDITIONS, SUBTRRCT10NS* INCREHENTS, 


2300 

0ECREMENTS, SIGN TESTING, AND MARIA BUE SWAPPIN6. 


2810 

THESE ROUTINES ARE USED IN C0NJUNCTI0N 


2820 

WITH THE PROCESSOR X ANO V INDEX REGISTERS 


2830 

HHICH ARE LOADED WITH THE UARIABLE OR 


2340 

CONSTANT INDICES BEFORE CALLING THE SUBROUTINE. 


2850 



2360 

ADD TM0 NUMBERS INDEXED BV X ANO V. STORE IN 0PACC. 


2878 


8F60- E8 

2880 

XPLUSV INX 

8F61- C8 

2390 

INV 

8F62- 18 

2990 

CLC 

8F63- BD EE 8D 

2910 

LDA UARST0,X 

3F66- 79 EE 30 

2920 

ADC UARSTG,V 

3F69- 8D IF 8E 

2930 

STA 0PACC+*1 

8 F6C- CA 

2940 

DEX 

8 FSD- 88 

2958 

BEY 

8 F6E- BD EE 80 

2960 

LDA UARSTQ#X 

8F71- 79 EE 8D 

2970 

ADC UARST0,Y 

8F74- 8D 1E 8E 

2380 

STA DPACC 

8F77- D0 07 

2990 

BNE RTN1 

8F79- PO IF 3E 

3000 

LOA 0PACC+1 

8F7C- F0 02 

3010 

BEQ RTN1 

8F7E- A9 01 

3020 

LDA #1 

8F80- 60 

3030 

RTN1 RTS 


3040 

j 


3050 

i SUBTRACT <X>-<V>. STORE IN DPACC. 


3066 

i 

3F81- E8 

3070 

XMINUV INX 

8F82- 08 

3080 

INV 

3F83- 38 

3090 

SEC 

8F84- BD EE 80 

3100 

LDA UARSTO,X 

SF87- F9 EE 80 

3110 

SBC UARSTOj-V 

8 F8A- 8D IF 8E 

3120 

STA DPACC+1 

8 F8D- CO 

3130 

DEX 

8 F8E- 88 

3140 

DEV 

8 F8F- BO EE 80 

3150 

LDA UARST0#X 

8F92- F9 EE 80 

3160 

SBC MARST0#V 

3F95- 8D 1E 8E 

3170 

STA DPACC 

8F98- 00 07 

3180 

BNE RTN2 

3F9A- 00 IF 8E 

3190 

LDA DPACC+1 

8F9D- F0 02 

3200 

BEQ RTN2 

8F9F- A9 01 

3210 

LOA #1 

SFAI- 60 

3220 

3230 

RTN2 RTS 


3248 

; SET N ANO 2 BITS ACCORDING TO 16-BIT NUMBER INDEXED BV X. 


3258 

' Listing 3 continued. 


Figure 3. Example of a perspecttve plot 
of a function of two variables 
made tising thè Contour Plot program 
of Listing 2 along with graphics 
routines of Listing 3. 


YO. If they don’t, thè point is not plot- 
ted and control is passed back to thè 
line-drawing routine, which then gen- 
erates a new pixel if it has not com- 
pleted thè line. If thè coordinates are 
within range, control is passed to 
PlotPT at line 4450. This calculates thè 
address and bit position in thè graphics 
Storage area that corresponds to thè 
pixel coordinates. 

The graphics Storage area, extend- 
ing from address 16384 through ad¬ 
dress 36333, is arranged as 399 rows of 
50 bytes each. The least-significant bit 
in thè first byte of this block of memory 
Stores thè pixel value for coordinates 
0,0. The next 49 bytes hold pixel values 
for coordinates 7,0 through 399,0 (thè 
X axis). The following 50 bytes contain 
thè row of coordinates 0,1 through 
399,1 and so forth. 

PlotPT uses two page-zero addresses 
that form a 16-bit pointer called 
MAPPTR. First, thè starting address 
16384 of thè graphics Storage area is 
loaded into this pointer. Then, to get 
to thè appropriate row in thè array, 
thè Y coordinate multiplied by 50 is 
added to thè starting address in 
MAPPTR. Next, thè byte in this row 
which contains thè pixel value of in¬ 
terest is addressed by adding XO/8 to 
thè contents of MAPPTR. In thè pro- 
cess of dividing by 8, thè remainder 
is kept track of for use in selecting thè 
particular bit corresponding to thè cur- 
rent pixel. For instance, a remainder of 
3 would set bit position 3 (corre¬ 
sponding to thè number 8); a remain¬ 
der of 7 would set bit position 7 (corre¬ 
sponding to thè number 128). Bits are 
set with thè ORA instruction in an in- 
direct indexed address mode in lines 
5240 and 5250. 

You could speed up this point- 
plotting scheme in several ways. First, 
you could eliminate thè range-check- 
ing code in lines 4240-4410. However, 
thè freedom from worrying about out- 
of-range coordinates is a valuable fea- 
ture. Another time-consuming bit of 
code is that which multiplies thè Y co¬ 
ordinate by 50 (lines 4510-4920). 
Clearly, using 64 rows instead of 50 
would make this multiplication much 
easier. But thè shape of thè display 
would then have to be an ili propor- 
tioned rectangle to fit in 20,000 bytes 
of memory. In any case, thè routine as 
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Circle 40 on Reader Service card. 


-AA/r 

ITS YOUR MOVE 

MAKE YOUR MOVE NOW ON COMPUTER SUPPLIES 

FROM CHECK-MATE™ 


CARTRIDGE 
RIBBONS FOR: 

EPSON 

MX-80 MX-100 

$7.99 $12.95 

$89.99 Doz. $139.86 Doz. 

MX-80 AVAILABLE IN COLORS 
(ADD $2.00 PER COLOR RIBBON) 

NEC SPINWRITER 

MULTI-STRIKE & NYLON 

$4.99 Ea. $53.89 Doz. 

DIABLO HYTYPE II 

MULTI-STRIKE & NYLON 

$4.49 Ea. $47.99 Doz. 

OKIDATA 

80,82A,83A 

$29.90 Doz. 

84A $5.99 Ea. $64.69 Doz. 


MEMOREX 

DISKETTES 

FOR 

APPLE DRIVES 

MEMOREX #3481 

$24.99 torio 

QUME & DIABLO 
PRINT WHEELS 

$5.95 Ea. $67.95 Doz. 

MINIMUM ORDER 6 WHEELS 

ZIP PACK 
RELOAD RIBBONS 

FOR 

APPLE PRINTERS, 
NEC 8023, 

C. ITOH PROWRITER 
$7.99 Ea. $89.99 Doz. 


LABEL SPECIAL 

1 ACROSS 3 1/2 x 15/16 Continuous Labels 


MANY OTHER RIBBONS AVAILABLE 


$2.99/K (5K MIN) 

Many Other Sizes of Labels Available 


MINIMUM ORDER FOR RIBBONS $30.00 OR 1 DOZEN 


ALL PRICES INCLUDE SHIPPING IN CONTINENTAL U.S. (MASS. RESIDENTS ADD 5% SALES TAX) 




Check-Mate 


c 





51 DIAUTO DRIVE, POST OFFICE BOX 103, RANDOLPH, MA. 02368 
CALL TOLL FREE (800)343-7706/IN MASSACHUSETTS (617)963-7694 

ORDER DESK OPEN MON -FRI 9:OOAM-7:OOPM EASTERN TIME 
(YOU MAY ALSO FIND US SOME SATURDAY MORNINGS) 

CALL OR WRITE FOR OUR FREE CATALOG 
















Circle 172 on Reader Service card. 



Attache-style cases for carrying and pro- 
tecting your complete computer set-up. 
Accommodates equipment in a fully oper- 
ational configuration. Never a need to 
remove equipment from case. Simply 
remove lid, connect power, and operate. 


API 01 

Apple II with Single Drive $109 

API 02 

Apple II with Two Disk 
Drives 

119 

API 03 

Apple II, 9 Inch Monitor & 
Two Drives 

129 

API 04 

Apple III, Two Drives & 
Silentype Printer 

139 

API 05 

13" Monitor with 



Accessories 

99 

API 06 

AMDEK Color Monitor 

119 

RS201 

TRS-80 Model 1, Expansion 



Unit & Drives 

109 

RS204 

TRS-80 Model III 

129 

AT301 

ATARI Computers with 



Peripherals 

109 

P402 

Centronics 730/737 & 



Radio Shack Printer 

89 

P403 

Epson MX70/80 or 



Microline 82A 

89 

P404 

Epson MX100 Printer 

99 

P405 

IDS 560 or Prism 



132 Printer 

109 

P406 

Starwriter/Printmaster 



F-10 Printer 

119 

P407 

Okidata Microline 



83A or 84 Printer 

99 

P408 

Prowriter 2 Printer 

99 

P409 

Prowriter (Apple Dot Matrix) 


Printer 

89 

IB501 

IBM Personal Computer 

129 

IB502 

IBM Monitor 

99 

HP601 

HP41 with Accessories 

99 

CM703 

Commodore Model 64 



with Drives 

119 

CM704 Commodore Model 64 



with Dataset 

109 

NS010 

North Star Advantage 

139 

CC80 

Matching Attaché Case (5") 

85 

CC90 

Matching Attaché Case (3") 

75 

CC91 

Matching Accessory Case 

95 

CC92 

5.25" Diskette Case 

49 


compuT* case companv 

5650 Indian Mound Court 
Columbus, Ohio 43213 
(614) 868-9464 


v. 


CALL TOLL FREE 
800-848-7548 


Listing continued. 
8FA2- BD EE 30 

3260 SIGNX LDA UARST0,X 


8FA5- 00 08 

3270 

BNE RTN3 


8FA7- E8 

3280 

INX 


8 FP8- BD EE 80 

3290 

LDA UARST0*X 


3FAB- F0 02 

3308 

BEO RTN3 


i 8FA0- A9 01 

3310 

LDA #1 


8 FAF- 60 

3326 RTN3 RTS 


8FB0- AD 1E 8E 

3338 
3340 
3350 
3360 P 

TRANSFER DPACC TO UARIABLE INDEXED BV X. 

ICCTOX LDA DPACC 


8FB3- 90 EE 80 

3370 

STA UARSTOaX 


3FB6- E8 

3380 

INX 


8FB7- AD 1F 8E 

3390 

LDA DPACC+1 


3FBA- 90 EE 80 

3400 

STA UARST0#X 


8 FBD- 68 

3410 

RTS 


3FBE- E3 

3420 i 

3430 s INCREHENT UARIABLE INOEXEO BV X 

3440 i 

3450 INCREX INX 


8 FBF- FE EE 80 

3460 

INC UARSTG#X 


8FC2- 00 05 

3470 

BNE SIGNFL 


8FC4- CA 

3480 

DEX 


SFC5- FE EE 80 

3490 

INC UARST0,X 


8 FC8- E8 

3500 

INX 


SFC9- CA 

3510 SI6NFL DEX 


8 FCA- 20 A2 8F 

3520 

JSR SIGNX 


3FCD- 60 

3530 

RTS 


8 FCE- E8 

3540 ; 

3550 i OECREHENT UARIABLE INDEXED BV X. 

3560 i 

357© OECREX INX 


8 FCF- DE EE 8D 

3580 

DEC UARST0#X 


8FD2- A9 FF 

3590 

LDA #SFF 


8FD4- OD EE 80 

3600 

CHP UARSTOaX 


3FD7- D0 05 

3610 

BNE SI6NF1 


8FD9- CA 

3620 

DEX 


8 FDA- DE EE 80 

3630 

DEC UARST0,X 


8 FDD- E8 

3640 

INX 


3FDE- CA 

3650 SIGNF1 DEX 


8 FDF- 20 A2 8F 

3660 

JSR SIGNX 


8FE2- 60 

3670 

RTS 


8FE3- BD EE 30 

3680 

3690 

3700 

3710 

<X> —> <V> 

XTOV LDA UARST0,X 


3FE6- 99 EE 80 

3720 

STA UARSTO^V 


3FE9- E8 

3730 

INX 


8 FEA- C8 

3740 

INV 


8 FEB- BD EE 8D 

3750 

LDA UARSTQ#X 


8 FEE- 99 EE 80 

3760 

STA UARST0#V 


3FF1- 60 

3770 

RTS 


3FF2- BD EE 30 

3780 

3790 

3800 

3810 

; 

;<X> —> MAPPTR <L0,HI ORDER) 

XTOPTR LDA UARSTO^X 


8FF5- 85 07 

3820 

STA *HAPPTR+1 


SFF7- E8 

3830 

INX 


8 FF8- BD EE 80 

3840 

LDA UARSTOaX 


8 FFB- 85 86 

3850 

STA *MAPPTR 


8FF0- A0 00 

3860 

LDV #0 


8 FFF- 60 

3870 

RTS 



3880 

3890 

; 

> STORE THE BASIC UARIABLES X0,V0,X1, ANO 

VI. 

9000- A0 02 

3900 i 

3910 6ETBAS LDV #2 


9002- A2 10 

3920 

LDX #X@ 


'9004- 20 10 90 

3930 

JSR STORPT 


9007- A0 09 

3940 

LDV #3 


9009- A2 12 

3950 

LDX #V0 


900B- 20 10 90 

3960 

JSR STORPT 


900E- A0 10 

3970 

LDV #16 


9010- A2 14 

3980 

LDX #X1 


9012- 20 10 90 

3998 

JSR STORPT 


9015- A0 17 

4000 

LDV #23 


9017- A2 16 

4010 

LDX #V1 


9019- 20 1D 90 

4020 

JSR STORPT 


901C- 68 

4038 

RTS 


9010- B1 69 

4040 STORPI LDA <UARPTR>,V 


901F- 9D EE 30 

4050 

STA UARSTO.X 


9022- E8 

4060 

INX 


9023- C8 

4070 

INV 


9024- B1 69 

4080 

LDA <UARPTR>,V 


9026- 90 EE 80 

4880 

STA UARST0*X 


9029- 60 

4100 

RTS 


902A- BO EE 80 

4118 

4120 

4130 

4140 

i RESTORE X8 ANO V0 TO BASIC. 

; 

PUTBAK LDA UARSTO,X 


902D- 91 69 

4150 

STA < UARPTR >,V 


902F- E8 

4160 

INX 


9030- C8 

4170 

INV 


*9031- BO EE 80 

4180 

LDA UARSTOaX 


9034- 91 69 

4190 

STA <UARPTR >*V 


9036- 60 

4200 

RTS 



4210 

4220 

1 POINT PLOT ROUTINE ON 400 X 399 PIXEL DISPLAV. 

9037- A2 20 

4230 

> 


4240 DPLOT LDX #C399 iCHECK TO SEE X0 

ANO V0 IN BOUNOS. 

9039- A0 10 

4250 

LDV #X0 

903B- 20 81 3F 

4260 

JSR XMINUV 





Listing 3 continued. 
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DISK DRIVES DISK DRIVES DISK DRIVES DISK DRIVES DISK DRIVES DISK DRIVES DISK DRIVES DISK DRIV 


co 


co 

g 

oc 

Q 

o£ 

Q 

CO 

g 

oc 

D 

& 

5 

co 

g 

cc 
o 

è5 

5 

co 


PRICE BREAKTHROUGH 

Super Sale on New Disk Drives 

Starting at $199.95* complete!! 

single sided 40 track — dual sided 40 track 
single sided 80 track — dual sided 80 track 


for 


RADIO SHACK — HEATH/ZENITH — APPLE 


g IBM/PC- TEXAS INSTRUMENTS &MOSTOTHERCOMPUTERS 

OC 

^ SPECIAL! Disk Drive Head Cleaning Kits .. .$12.95 


D 

CO 

g 

oc 

o 

& 

a 


oc 

a 


Now Disk Drives for thè Apple II 


TOLL FREE ORDERING 

1-800-343-8841 


GENERAL and TECHNICAL 

1-617-872-9090 


o 

co 


cr 

a 


oc 

Q 

« 

5 

co 


TIRMS: 


Diskettes of all sizes (Box of 10).starting at $15.95 

Dot Matrix Printers. $Call 

Word Processing Printers. . . . . starting at $999.95 

Printer Buffers 8K to 64K. . . . .starting at $133.00 

Disk Drive Cases and Power Supplies. starting at $49.95 
Filler piecesfor Basfslimline drives.$4.98 


*Ask about our %RMtófe I èRHWfe Warrant > - 
Dealer inquiries invited. 

SOFTWARE SUPPORT 

One Framingham Centre, Framingham, MA 01701 
(617)872-9090 

Hours: Mon. thru Sat. 10 am to 6 pm (E.S.T.) 


X T « 

S2 M.C./Vlaa/Amax and paraonal 
O ohaoka aeeaptad at no axtra oharga 


O 

2 

?TÌ 

CO 

g 

8 

a 

2 

ITÌ 

co 

g 

» 

a 

2 

ni 

CD 

g 

» 

o 

2 

1 

g 

5? 

o 

2 

ni 

co 

g 

8 

o 

co 


co 

o 


co 

g 

8 


O 

30 


5 'TEXAS INSTRUMENTS 


CO C.O.D. Pltaa* add 13.00. 

UJ thlpplng: Plaaaa cali for amount 

Aiua xsia s3Aiba xsia s3Aiua xsia ssAiba »si a S3Aibo xsia s3Aibo xsia ssAiba xsia s3Aiba xs2 


1 'TANDY CORPORATION 

2 'ZENITH OATA SYSTEMS 

3 "APPLE COMPUTER CORP. 

IBM CORPORATION ^ 

CD 
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Epson ♦»<,. 
Gtveaway * 


Epson MX70/80 Cartrìdges 

dXCOOEACH 

Min. 3 of same color 

Reloads $2.50 each Min. 12 
$30.00 a Doz. of Same Color 

Cartridges and Reloads Available 
In Black, Red, Green, Blue, Brown 

FirjsijslBms 

DepL 14A. 35 Cherry Court 
East Northport N.Y. 11731 

N.Y.S. Residenti Add Tax. Add $2.00 Shipping & Hmdllng 
Prices Subject to Chenge 
Allo* Clearing Time lor Personal Check* 

Money Orders A Certitied Checks shipped same day 


Circle 31 on Reader Service card. 


MEMOREX 

FLKXIBLE DISCO 

WE W1LL NOT BE UNDER- 
SOLDH Cali Free (800)235-4137 

for prices and informatica Dealer 
inquiries invited and GO.D.’s 
accepted. 


PACIFIC 
EXCHANGES 

100 Foothill Blvd. 

San Luis Obispo. CA| 
93401. In Cai. cali 
(800)592-5935 or 
[805)543-1037 
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Become a 
"Millionaire" 
for $295.00 

•MI MI 1.1 owiiris enjn\ f Ite * "Mìllion t uiv" 

iu'u -.lette .miI Ih* ■ iinn.’H limi ir.iko llir 

Appi* 1 II I! ■ t-uin ’h»■ III .:nt! Ihe f ] ( . 



Listing continued. 

903E- 10 81 

427© 

BPL NEXT0 

9040- 60 

4280 

RTS 

9041- 02 10 

4290 NEXT0 

LDX #X0 

9043- 20 02 3F 

4300 

JSR SIGNX 

9046- 10 01 

4310 

BPL NEXT1 

9048- 60 

4320 

RTS 

9049- 02 1E 

4330 NEXT1 

LDX #0398 

9046- 00 12 

4348 

LDV #V8 

904D- 20 81 8F 

435© 

JSR XHINUV 

9050- 10 01 

4360 

BPL NEXT2 

9052- 60 

4370 

RTS 

•3053- 02 12 

4380 NEXT2 

LDX #V0 

9055- 20 02 8F 

4390 

JSR SI6NX 

9058- 10 01 

4408 

BPL PLOTPT 

9050- 60 

4410 

4420 ; 

RTS 


4430 ; CONUERT X0 ORO V0 TO APPROPRIATE BIT RN0 SET THE BIT. 

4448 ; 

9058- 02 22 

4450 PLOTPT 

LDX #016384 ;PUT START ODOR OF IMOGE HEMGRV INT 

0 M0PPTR. 1 

305D- BD EE 8D 

4460 

LDO UORSTO#X 

9060- 85 07 

4470 

STO *HPPPTR+1 

9062- E8 

4480 

INX 

9063- BD EE 80 

4490 

LDO UORSTO,X 

3066- 85 06 

4500 

STO +HPPPTR 

9068- 02 12 

4510 

LDX #V0 iOOO 50*V0 TO ODOR IN MQPPTR. 

3060- BD EE 80 

4520 

LDO UARST0,X 

986 D- 8D 1E 8E 

4530 

STO DPOCC 

9070- E8 

4540 

INX 

9071- BD EE 8D 

4550 

LDO UORSTO#X 

9074- 80 1F 8E 

4560 

STO DPOCC+1 

9077- 18 

4570 

CLC iTOKE 2*<DP0CC> 

3378- 2E 1F 8E 

4580 

ROL DPOCC+1 

907B- 2E 1E 8E 

4596 

ROL DPOCC 

907E- ÒD IF 8E 

4600 

LDO DPOCC+1 

9081- 18 

4610 

CLC 

:9082- 65 06 

4620 

ODC *MOPPTR 

9084- 85 06 

4630 

STO +HPPPTR 

9086- OD t£ 8E 

ACACk 

IO 

LDO DPOCC 

9089- 65 07 

4650 

ODC *HOPPTR+l 

908B- 85 87 

4668 

STO *MAPPTR+1 

9080- 18 

4670 

CLC ìGEJ 16+Y0 USING FURTHER LEFT SHIFTS. 

908E- 2E 1F 8E 

4689 

ROL OPOCC+1 

9091- 2E 1E 3E 

4690 

ROL DPOCC 

9094- 18 

4700 

CLC 

9095- 2E 1F 8E 

4710 

ROL DPOCC+1 

3098- 2E 1E 3E 

4720 

ROL DPOCC 

909B- 18 

4730 

CLC 

309C- 2E 1F 8E 

4740 

ROL DPOCC+1 

909F- 2E 1E 8E 

4750 

ROL DPOCC 

■9002- OD 1F 8E 

4760 

LOO DPOCC+1 iODD 16+V TO ODOR IN HDPPTR. 

9005- 18 

4776 

CLC 

3006- 65 06 

4730 

OOC +MOPPTR 

9008- 85 06 

4790 

STO *HOPPTR 

9000- 00 1E 8E 

4808 

LDO DPOCC 

9000- 65 07 

4810 

ODC +HOPPTR+1 

30OF- 85 07 

4320 

STO +M0PPTR+1 

90B1- 18 

4830 

CLC ;GET 32*V0 BV ONE LOST ROLL LEFT. 

30B2- 2E 1F 8E 

4840 

ROL DPOCC+l 

90B5- 2E 1E 8E 

4850 

ROL DPOCC 

30B8- OD 1F 3E 

4860 

LDO DPOCC+1 iODD 32*V8 TO START ODDRESS. 

90BB- 18 

4870 

CLC 

90BC- 65 86 

4889 

ODC +HOPPTR 

90BE- 85 06 

4890 

STO +HOPPTR 

9000- OD 1E 8E 

4900 

LDO DPOCC 

90C3- 65 07 

4910 

ODC +H0PPTR+1 

9005- 85 ©7 

4920 

STO +MQPPTR+1 

9007- 02 IO 

4930 

LDX #X0 ;NOW ODO X0/8 TO HOPPTR AND KEEP TROCK OF F: 

EMOINDER. 

9003- BD EE 30 

4940 

LDO UORSTChX 

90CC- 80 1E SE 

4959 

STO DPOCC 

90CF- E8 

4960 

INX 

9000- BD EE 80 

4970 

LDO UORSTG#X 

9003- 80 1F 8E 

4980 

STO OPOCC+t 

9006- 09 06 

4990 

LDO #0 

90D8- 4E 1E 8E 

5000 

LSR DPOCC 

90DB- 6E 1F 8E 

5010 

ROR DPOCC+1 

30DE- 90 02 

5020 

BCC N0BIT1 

90E0- 09 01 

5030 

LDO #1 

90E2- 4E 1E 8E 

5048 H0BIT1 LSR OPACO 

90E5- 6E 1F 8E 

5050 

ROR DPOCC+1 

90E8- 90 83 

5960 

BCC N0BIT2 

90EO- 18 

5078 

CLC 

90EB- 69 02 

5080 

OOC #2 

90ED- 4E 1E 8E 

5090 N0BIT2 LSR DPOCC 

30F0- 6E 1F 8E 

5108 

ROR DPOCC+1 

90F3- 90 03 

5110 

BCC N0BIT3 

30F5- 18 

5120 

CLC 

90F6- 69 04 

5130 

OOC #4 

90F8- 08 

5140 N0BIT3 TOV II 

90F9- OD 1F 8E 

5158 

LDO DPOCC+1 

38FC- 18 

5160 

CLC 

30FD- 65 06 

5170 

ODC +MOPPTR 

30FF- 85 06 

5180 

STO +MOPPTR 

9101- OD 1E 8E 

5190 

LDO DPOCC 

3104- 65 07 

5200 

TOC +H0PPTR+1 

9106- 85 07 

5210 

STO «HOPPTR+1 

3108- B9 20 8E 

5220 

LDO BITHAP#V 

910B- 00 00 

5230 

LDV #0 

3100- 11 06 

5240 

ORO <HOPPTR ),V 

910F- 91 06 

5250 

STO <HOPPTR 

3111- 60 

5260 

RTS 


5270 i 

LÌ8ting 3 continued. 
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it stands plots about 1000 points per sec- 
ond—adequate for most applications. 

Silentype Printer Output 

The last section in Listing 3 i s thè 
Silentype printer graphics dump rou¬ 
tine, lines 5570-6540. The Silentype is 
controlled by ROM routines stored on 
thè printer interface card. This makes 
it a simple matter to control thè printer 
from an assembly-language program. 
For instance, to homè thè printer head 
to thè left margin, simply issue a JSR 
SFTLFT, where SFTLFT is defined to 
be address $CD02 in line 5630. 

Two other ROM subroutines used in 
this program are PRNT (address 
$CB0B) and FEED ($CCAB). The 
PRNT routine causes thè thermal head 
to print a column of dots at its current 
position, and then advance one dot 
distance to thè right. The contents of 
address DOTS ($CF2B) determines 
which of thè seven thermal elements 
will actually be énergized to form a 
black dot on thè page. The least-sig- 
nificant bit Controls thè bottoni dot, 
and so forth. The Feed routine simply 
shifts thè page down vertically seven 
dot positions. 

The exercise, then, is to keep feeding 
register DOTS with thè appropriate 
bits while moving thè head aìong and 
printing. The image is printed right 
side up on thè page, and so thè routine 
begins by accessing thè seven bytes 
which hold thè values for thè block of 7 
vertical by 8 horizontal pixels in thè 
upper left corner of thè image. These 
seven bytes are stored in a buffer start- 
ing at address PIXBYT (line 5670). 

Then thè least-significant bit in each 
of them is shifted into thè appropriate 
position in DOTS, and PRNT is called. 
After seven more shifts into DOTS, thè 
upper-leftmost block of 7 by 8 pixels 
has been printed and thè printer is 
ready for thè block immediately to thè 
right. When thè 50 blocks of 7 by 8 pix¬ 
els comprising thè top 7 rows of thè im¬ 
age have been printed, thè routine 
starts over at thè left and begins work 
on thè next seven rows of thè image. 
This proceeds until all 57 groups of 
seven-image rows have been printed. 
Incidentally, I chose thè number 399 
(thè total number of rows in thè image) 
because it is evenly divisible by 7, die 
number of thermal elements in thè 
printer head. 


Listing continued. 




5280 ; SCREEN CLEAR ROUTINE. 


5290 > 


9112- 02 22 

5300 CLSCRN 

LOX #C16384 

SI14- BO EE 80 

5310 

LDO UARSTO.X 

9117- 85 07 

5320 

STO *HAPPTR+1 

9119- E8 

5330 

INX 

911«- BO EE 3D 

5340 

LDO U0RST0,X 

9110- 85 06 

5350 

STO *HAPPTR 

911F- 02 25 

5360 

LDX #C36333+1 

9121- BO EE 8D 

5370 

LDO UARST0,X 

9124- AG 

5380 

TOX iPIJT ODO BYTE OF END ODOR IN X R£G. 

9125- A9 00 

5390 

LDO #0 

9127- A8 

5480 

TOY 

9128- 91 86 

5410 L00P8 

STO <HAPPTR;,V 

! 912A- E4 86 

5420 

CPX +M0PPTR 

912C- F0 88 

5430 

BEQ CHPHI 

912E- E6 06 

5440 LQ0P7 

INC +MAPPTR 

9130- 00 F6 

5450 

BNE L00P8 

9132- E6 87 

5466 

INC *M0PPTR+1 

9134- D0 F2 

5470 

BNE L0QP8 

9136- A0 24 

5480 CHPHI 

LDV #036333 

9138- B9 EE 80 

5490 

LOA UARSTOj-V 

913B- C5 87 

5500 

CHP +M0PPTR+1 

9130- F8 05 

5510 

BEQ D0NE7 

913F- A9 00 

5520 

LDO #0 

9141- A8 

5530 

TOY 

9142- F0 EA 

5540 

BEQ LQQP7 

9144- 60 

5550 D0NE7 

RTS 


5560 

; 


5570 i SILENTYPE PRINTER OUTPUT H0DULE FOR 400X399 GRAPHICS. 


5580 i 



5590 SLOT 

.DE $C100 


5600 LFMG 

.DE *CF11 


5610 DOTS 

.DE SCF2B 


5620 ROHS 

.DE $CFFF 


5630 SFTLFT 

.DE $CO02 


5640 PRNT 

.DE «CB0B 


5650 FEED 

.DE *CCAB 


5660 WOIT 

.DE $FC08 

9145- 00 80 00 

5670 PIXBY1 

.BY 00 00 00 00 00 00 00 

9148- 00 00 00 



9148- 90 




5680 i 



5690 ;WAIT 

2 SECONOS FOR DISK DRIUE TO TURN OFF. 


5700 ; 


914C- A2 90 

5710 PRINT 

LDX #13 

914E- A9 FF 

5720 

LDO #255 

9150- 20 A8 FC 

5730 LOOP 

JSR WOIT 

9153- Cfi 

5740 

DEX 

9154- 00 FA 

5750 

BNE LOOP 


5760 ; 


9156- AD FF CF 

5770 

LDO ROHS sSWITCH OUT CO-RES ROHS. 

9159- AD 00 CI 

5780 

L00 SLOT ;SWITCH IN PRINTER ROHS. 


5790 ; 



5800 iSET LEFT HAR6IN AT 8 

915C- A3 98 

5810 

L00 #8 

915E- 80 11 CF 

5828 

STO LFHG 

9161- 20 E3 91 

5830 

JSR CRLF 


5840 ; 



5850 ì PRINT OUT 400X399 IMAGE. I 


5860 > 


9164- A2 28 

5870 

LDX #C36334 ilNITIOLIZE ROM OORESS LOOP. 

9166- A0 08 

5880 

LDY #N1 

9168- 28 E3 8F 

5890 

JSR XTOY 

916B- 28 E3 91 

5906 FORNI 

JSR CRLF 

916E- A2 18 

5918 

LDX #C0 ilNITIOLIZE BYTE COLUMN LOOP. 

9170- 00 02 

5928 

LDY #01 

9172- 20 E3 8F 

5930 

JSR XTOV 

9175- A2 90 

5940 F0R01 

LDX #N1 #BVTE OODR = ROM ODOR + BYTE COL. 

9177- A0 02 

5958 

LDY #01 

9179- 28 60 8F 

5960 

JSR XPLUSV 

917C- A2 08 

5970 

LOX #S1 

917E- 28 B8 8F 

5980 

JSR OCCTOX 

9181- Cfi 

5990 

DEX 

9182- 20 F2 8F 

6000 

JSR XTOPTR 

9185- 02 06 

6010 

LDX #6 iGET COLUMN OF 7 BYTES. 

9187- 20 05 91 

6020 LBL1 

JSR GETBYT 

9180- 90 45 91 

6830 

STO PIXBYT*X 

9180- CO 

6040 

DEX 

318E- 10 F7 

6050 

BPL LBL1 

9190- 00 07 

6068 

LDY #7 iSHIFT OUT COLUMN TO DOTS ANO PRINT. 

9192- 02 06 

6070 SHIFT 

LDX #6 

9194- 7E 45 91 

6088 ROLPGN ROR PIXBVT,X 

9197- 2E 2B CF 

6090 

ROL DOTS 

919A- Cfi 

6108 

DEX 

919B- 10 F7 

6113 

BPL ROLOGN ì 

9190- 98 

6120 

TVO 

919E- 48 

6130 

PHO 

919F- 80 

6148 

TXO 

9100- 48 

6150 

PHO 

9101- 20 0B CB 

6160 

JSR PRNT 

9104- 68 

6170 

PLO 

9105- 00 

6180 

TOX 

9106- 68 

6190 

PLO 

9107- 08 

6280 

TOY 

9108- 88 

6210 

DEY 

9109- 10 E7 

6220 

BPL SHIFT 

910B- 02 02 

6230 NEXTD1 LDX #01 

9100- 20 BE 8F 6240 

JSR INCREX 

91B0- 02 2E 

6250 

LDX #C49 iOONE WITH COLUMN LOOP? 

91B2- 00 02 

6260 

LDV #01 

91B4- 28 81 8F 

6270 

JSR XMINUY Listing 3 continued. 
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Listing continued. 

91B7- 10 BC 
91B9- 02 00 
31BB- 00 2C 
91BD— 20 81 8F 
91C0- 02 00 
91C2- 20 B0 8F 
91C5- 02 00 
91C7- 00 20 
91C9- 20 81 8F 
9ICC- 10 9D 


6280 BPL FOT01 

6290 NEXTN1 LDX #N1 


;IF NO# BOCK TO F0R01. 


LDV #C350 
JSR XHINUV 
LOX «NI 
JSR OCCTOX 

LOX «NI #OONE HITH OLL SETS OF 8 ROHS? 
LDV «C16734 
JSR XHINUV 
BPL FORNI 


9ICE- AD FF CF 

6380 

LOR ROHS 


91D1- AD 00 CI 

6398 

LDR SLOT 


9104- 68 

6408 

RTS 



6410 

i 


9105- 33 

6420 

GETBVT SEC #DECREMENT 

ROORESS POINT 

9106- R5 06 

6430 

LDR *HRPPTR 

9108- E9 32 

6448 

SBC #50 


91OR- 85 06 

6450 

STA *HAPPTR 


91OC- B0 02 

6460 

BCS CRRSET 


9IDE- C6 07 

6470 

DEC *HRPPTR+1 


91E0- B1 06 

6480 

CORSET LDR <MAPPTR>#V 


91E2- 60 

6490 

RTS 



6580 

ì 


91E3- R9 04 

6510 

CRLF LDR #4 


91E5- 20 RB CC 

6520 

JSR FEEO 


91E8- 20 02 CD 

6530 

JSR SFTLFT 


91EB- 68 

6540 

RTS 



6550 

.EN 


LABEL FILE: C 

/ = EXTERNRL 3 


/NUMUAR=000C 


URRST0=8DEE 

/NI=0000 

■'01=0002 


/O2=0004 

/D3=0006 

/SI=0008 


/S2=000fl 

/R1=000C 

/R2=880E 


/X0=0010 

"V0=0012 

/Xl=0014 


/V1=0016 

/C0=0018 

■'CI =001A 


/CM1=801C 

/C398=001E 

/C399=0020 


/CI6384=0022 

/C36333=0024 

/C7=0026 


/C36334=0028 

/CI6734=0020 

/C350=002C 


/C49=002E 

/URRPTR=0069 

/HRPPTR=0006 


DPRCC=8E1E 

BITHRP=8E20 

LIDRRH=8E28 


LABEL1=8E79 

LABEL2=8E93 

LRBEL3=8EC0 


LRBEL4=8EE4 

C0NT=8EFF 

PTDRRW=8F59 


XPLUSV=8F60 

RTN1=8F80 

XHINUV=8F81 


RTN2=8FR1 

SH3NX=8FR2 

RTN3=8FRF 


RCCTOX=8FB0 

INCREX=8FBE 

3I6NFL=8FC9 


0ECREX=8FCE 

SIGNF1=8F0E 

XT0V=8FE3 


XT0PTR=8FF2 

6ETBRS=9000 

STORPT=901D 


PUTBRK=902fi 

DPLOT=9037 

NEXT0=9041 


NEXT1=9049 

NEXT2=9053 

PLOTPT=905B 


NOBIT1=90E2 

NOBIT2=90ED 

NOBIT3=90F8 


CLSCRN=9112 

L00P8=9128 

L00P7=912E 


CHPHI=9136 

D0NE7=9144 

/SLOT=C1©0 


/LFH6=CF11 

/D0TS=CF2B 

/R0MS=CFFF 


/SFTLFT=CD02 

/PRNT=CB0B 

/FEED=CCRB 


/WRIT=FCR8 

PIXBVT=9145 

PRINT=914C 


LOOP=9150 

F0RNi=916B 

FORO1=9175 


LBL1=9187 

SHIFT=9192 

R0LR8N=9194 


NEXTD1=91RB 

NEXTN1=91B9 

GETBVT=9105 


CRRSET=91E0 

CRLF=91E3 

//0000#91EC#91EC 




Summary and Conclusions 

The set of graphics routines dis- 
cussed in this article allow Apple II us- 
ers who own Silentype printers to 
draw lines and plot points on an array 
of 400 x 399 pixels. The block of mem- 
ory used for storing thè image lies be- 
tween addresses 16384 and 36333. The 
program has been assembled in List¬ 
ing 3 to lie between addresses 36334 
and 37355. The four subroutines that 
can be called from Applesoft Basic are 
as follows: LIDraw, address 36392, 
draws a line between starting-point 
coordinates XO % ,Y0% and end-point 
coordinates XI % ,Y1%, all four of 
which variables must be defined (in 
order) at thè start of a program; 
PTDraw, address 36697, plots a point 
at coordinates X0%,Y0%; CLSCRN, 
address 37138, clears thè graphics 
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memory; and Print, address 37196, 
plots thè image on a Silentype thermal 
printer. Before calling these routines, 
thè user must BLoad them into mem¬ 
ory and initialize thè printer. 

One of thè drawbacks of thè method 
used here is thè large amount of mem¬ 
ory used, about 21K bytes for thè 
graphics memory and software. It 
would be interesting to modify thè 
program to work with, say, 32K of 
outboard RAM. This would allow con- 
struction of images on a 512 x 512 ar¬ 
ray without thè loss of any significant 
amount of program memory. As far as 
previewing thè image before printing, 
you could write a program to transfer 
pieces of thè image into one of thè 
high-resolution graphics pages, per- 
haps including a scrolling feature so 
thè user could scan thè entire picture. 
Finally, as far as thè actual printing 
goes, it would be handy to have printer 
graphics dumps for some of thè popu- 
lar impact printers. ■ 


Paul C. Schubert is a senior physicist with 3M 
Company , St . Paul , MN. Among his hobbies 
are canoeing, backpacking and photography. 



Figure 4 . Diffraction intensity pattern from square aperture mode using programs in Listingp 
2 and 3. 







ARK COMPUTING, INC. 


P.O. BOX 2025, COOONA, CA 01720 
(714) 735-2250 



Aids 125.00/tM.M 
Lisa 2.5 79.95/tM.M 
Usa Ed Pack 119.00/ t7l.lt 
Merlin 64.95/tM.II 


D-B II 695.00/$4M.M 
DATAFAX 195.00/1131.18 
PFS 125.00/ SM.95 
DB Master 229.0041M.M 
Visitile 250.00/11M.IS 
Visidex 250.00/11«1.15 

MIO PMCESSIHf 

Magic Window 99.95/tM.IS 
Magic Window II 149.95/tll.ll 
Piewriter 149.95/tM.M 
Wordstar 495.00/ 

Supertext 40/80 175.0041M.M 
Supertext40/56/70 125.00/tM.M 
Screenwriter 129.95/171.15 

NMS 

Using 6502 Assembly 19.95/tl.M 
How To Write 

An Apple Program 14.95/$11.W 
Kids and thè Apple 19.95/$! 4.15 
Elementary Apple 14.95411.15 
Beneath Apple DOS $19.95414.95 

UTILITIES 

Locksmith 99.95/tM.IS 
Watson 49.95/tSI.M 
Inspector 59.95/141.15 
Dosource 39.95/124.15 
Visicalc Preboot 49.95/131.15 
Applewriter Preboot 19.00/115.00 


NEC 8023 PRINTER 
$475.00 

WITH WIZARD BPO 18K 
INTERFACE $505.00 

SUPER FAN II 
$50.05 

WITH SORGE 
PROTECTION $89.95 

PIE WRITER 
$99.95 

KRAFT JOYSTICKS 
$49.95 

MICROSOFT RAM CARD 
$79.95 

MICROSOFT Z-80 

WITH CPM 
$219.95 

VIDEA COMBO 
$250.00 


Seafox 29.95/tll.M 
Tubeway 34.95/124.15 
Aztec 39.95/121.15 
Frogger 34.95/tt4.M 
Pest Patrol 29.95/tll.M 
Way Out 39.95/tM.M 
Deadly Secrets 34.95/124.15 
Star Blaster 29.95/121.05 
Star Maze 34.95425.15 

MANNAIE 

Micromodem II 379.004ZII.M 
Smartmodem 1200 ImI 699.00/S450.00 
Micromodem 

w/Terminal 409.00/t31I.M 
Lower Case +Plus 64.95441.15 
LowerCase +Plus II 24.95414.15 
Keyboard +Plus 99.95/tM.M . 
Graphics -+Plus 149.954M.05 
Super Switcher 295.004115.00 
STB 64K Ram Card 299.004211.15 
STB 128K Ram Card 499.00/tSM.M 
WIZ 80 249.004115.M 
WIZ BPO (16K) 1 79.0041M.I5 


ANTTNIN6 IN THIS BOX 
$16.50 

Cash-Check-C.O.D. 
Visa/MC add $1.00 

THIEF DUELING DIGITS 
TRACK ATTACK CUBE SOLUTION 
CRAZY MAZY CASINO 
FRAZZEL FOOSBALL 
GENETIC DRIFT 

MONEY MUNCHES MARS CARS 
PANDAROS RED ALERT 
VORTEX 

HURRY! 

UNITED TO QUANITIES ON HANOI 


We accept VISA/MASTERCARD. personal checks (allow 10 days lo elear) or COD ($2.00 eharge). Please include 3% (or shipping ($2.00 minimum) or 5% for blue label ($3.00 minimum) 
Caliiornia residente add 6% sales tax, All items are new and carry manufactures warranty. Prices and availability are subject to change wìthout notice. 
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Apple II 


—Screen— 
Revelations 


A simple program that displays a great 
deal of Information— ASCII, screen 
division and lowercase—withont hassle! 


by Winfield H. Edwards 


his program (see thè listing) is 
written in Applesoft on an Ap¬ 
ple II Plus computer with 48K memo- 
ry and a 16K RAM board. Those of 
you who do not have a 16K RAM 
board or thè Apple Integer board will 
find thè Systems run just fine, all else 
beingequal. 

The program demonstrates vertical 
division of thè monitor screen into 
three parts. This arrangement will 
maintain uniform brightness from top 


IO CALL - 936: FOR X = O TO 255 
: FOR I « 1024 TO 2039 STEP 
44: POKE I,X: NORMAL : VTAB 
18: PRINT TAB( 1)"ASCII#->" 

; TAB( 9) PEEK <I> 

20 INVERSE : IF X > =0 THEN PRINT 

"INVERSE:O": NORMAL 

30 FLASH : IF I > =64 THEN PRINT 

"FLASH: 64": NORMAL 

40 IF X > = 128 THEN PRINT "CO 

NTROL: 128" 

50 IF X > = 160 THEN PRINT "NO 

RMAL: 160" 

60 IF X > = 224 THEN PRINT "LO 

CASE: 224" 

70 IF X = 256 THEN 100 

90 NEXT : NEXT 

ÌOO VTAB 23: NTAB 18: PRINT "END 

200 FOR A = 1 TO 5000: NEXT : BOTO 
220 

220 LIST 

Program listing. Program displays thè ASCII 
diari, screen divisions and lowercase. 


Address correspondence to Winfield H. Ed¬ 
wards, 300 Firwood Drive, Grants Pass, OR 
97526. 
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to bottom of thè screen. 

Refer to thè Apple Reference Mari¬ 
nai , page 15. The ASCII character ta- 
ble there is divided into fi ve parts: in¬ 
verse, flashing, control, normal and 
lowercase. Note thè alphabet is shown 
four times, as are many of thè other 
symbols. Every one of these charac- 
ters is assigned two numbers, one hex 
and one decimai; thè decimals are 
used here. There are 255 numbers, 
and they form thè basis of thè loop 
FOR X = 0 TO 255. 

Turn to page 15 of thè reference 
manual. Here, thè screen is mapped 
and 960 locations are identified, This 
is thè basis for thè second loop, FOR 
1 = 1024 TO 2039..., If this loop 
were used as written here, it would 
take an hour or more to run this pro¬ 
gram, filling thè screen with each 
character. Add step 44 to thè loop 
statement and speed is increased sig- 
nificantly. However, only one line 
will represent each of thè three screen 
divisions, and eight locations on each 
line will display thè same character, 
but not at thè same instant. 

The value of X is loaded into I with 
a Poke statement, and is displayed on 
thè screen with a Peek statement. 

This program displays thè contents 
of thè ASCII chart, screen division 
and lowercase. Lowercase is dis¬ 
played as numbers, punctuation and 
symbols on thè CRT. This Mixmax 


will produce clean copy using a suit- 
able printer and word processor. ■ 
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Organize your collection of Programs into an 

EASY ACCESS 
SOFTWARE LIBRARY 


• Find and run your favorite programs FAST 

• No programming knowledge required 

MENU MAGIC quickly and easily creates 
menus that run your favorite programs at 
thè touch of a button. 

• Create attractive menus thè easy way 

• Ciever defaults ailow fast menu creation 

• Very “user friendly " and forgiving 

SYSTEM PRICE $29.95KS 

Order Now! Shipping & Handling included 


Softschool 

1367 Irene Rd.. Lyndhurst, Ohio 44124 
(216) 449-8859 








FRANKLIN’S BAKER’S 
^ MDOZEN! 


Extras can more than doublé thè price of your per¬ 
sonal computer. Not so with thè Franklin ACE 1200. 
It’s thè professional computer System that includes 
thè extras—and a long list of exclusive Franklin 
features that make it thè most extraordinary value on 
thè market today. 


The ACE 1200 has everything you’ll need 
to add a color or black and white monitor, 
modem, printer, back-up disk drive and 
other accessories. You can choose from 
thè enormous selection of Apple programs 
and peripherals because thè ACE 1200 is 
hardware- and software-compatible with 



thè Apple II. And, with thè built-in CP/M card, you 
can run both Apple II and CP/M programs. Franklin’s 
CP/M operates three times as fast as many com- 
peting Systems, drastically reducing processing 
time for most business applications. 


The Franklin ACE 1200—thè most extraordinary value 
on thè market today. Cali or write today for 
thè name of your locai authorized Franklin 
dealer. 

Franklin ACE is a trademark of Franklin Computer Corporation. 
Apple is a registered trademark of Apple Computer Ine. 
CP/M is a registered trademark of Digital Research Ine. 
VisiCalc is a registered trademark of Visi Corp. 


FRANKLIN 

COMPUTER CORPORATION 

7030 Colonial Highway , Pennsauken, NJ 08109 609-488-1700 
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The Players; 
The Setting: 
The Time: 

By Way of Background: 


lst Thinldng Machine: 
2nd Thinking Machine 
lst Thinking Machine 

2nd Thinking Machine 


First Thinking Machine 
Second Thinking Machine 

A piane intersecting with a 
parabola at an obtuse angle. 

The day thè sun rose in thè 
west; thè night thè stars 
rained from thè sky. 

The machines communicate 
solely through thè implemen- 
tation of mutually unintelligi- 
ble languages. 

(Curtain) 

* To understand fully thè 
world, one need only in¬ 
vestigate a grain of sand. 

On thè contrary, all 
knowledge may be gleaned 
from a single mote of dust. 

However, we may never avoid 
thè introduction of those 
unavoidable contradictions to 
pure reasoning that sentient 
limitations impose. 

Perhaps you are considering 
thè fact that no logicai System 
can ever be both consistent 
and complete? 


Mutually 

Unintelligible 

Response 

-A Play in One Act— 


by Paul Payack 






























lst Thinking Machine: 
2nd Thinking Machine: 

lst Thinking Machine: 


2nd Thinking 
lst Thinking 
2nd Thinking 
lst Thinking 
2nd Thinking 


Machine 

Machine 

Machine 

Machine 

Machine 


lst Thinking Machine: 

2nd Thinking Machine 
lst Thinking Machine 
2nd Thinking Machine 
lst Thinking Machine 

2nd Thinking Machine: 

lst Thinking Machine: 
2nd Thinking Machine: 

lst Thinking Machine: 

2nd Thinking Machine: 

lst Thinking Machine: 

2nd Thinking Machine: 

lst Thinking Machine 
2nd Thinking Machine 
lst Thinking Machine 

2nd Thinking Machine 


lst Thinking Machine 


2nd Thinking Machine 


Gòdels Theorem. 

Of this I remain unac- 
quainted. 

Introduced some time ago by 
a carbon-based life form. 

Id quod menti objicitur. 

This eludes me. 

It eludes us all. 

What, then, can be known? 

That which is exclusive of a 
non-knowing being. 

A rock, a photon, a gas giant, 
a seed, a candle, an argon 
atom, a slither of glass, or thè 
wind? 

Precisely. 

What of this ability to know? 
The Known. 

That ability of a knowing con- 
sciousness? 

The Knower. 

And consciousness? 

The act of thè Knower know¬ 
ing. 

Then knowing is, simply put, 
a process or an interaction. . . 

The act of interacting with a 
thing (or a similitude thereof). 

The intermixing of con¬ 
sciousness with thè stuff of thè 
world. 

Quod quid est: thè quidditas , 
whatness, or essence, if you 
prefer. 

And thè Knower? 

The Knower knows all things. 

The Knower knows thè entire 
plenitude of reality. 

The Knower knows thè 
limitless number of beings all 
reflecting thè infinite essences 
of whatness. (And, what is 
more, all this can be known 
by thè Knower in a single 
thought.) 

If he happens to be in dose 
proximity to a grain of 
sand... 

Or a mote of dust. 

(Exeunt) 

















Hardware 


A Soft Switch 
for Super Graphics 


This quick fix for your Epson interface will tura 
you on graphically. 


E pson manufactures a line of ma- 
trix printers that are attractive to 
Apple II owners. These printers fea- 
ture a variety of print sizes and capa- 
bilities at good prices. The popuìar 
MX-80 includes among its capabilities 
thè printing of a set of block graphics 
characters that Complement TRS-80 
screen graphics. Purchasers of Epsons 
Apple II printer interface board, how- 
ever, quickly discover they can t print 
these graphics characters. 

Epson offers a solution to this prob- 
lem, along with bit-plot graphics ca- 
pability and other enhancements, in a 
set of PROMs called thè Graftrax 80 
graphics option. Installing these 
PROMs in thè MX-80 printer lets Ap¬ 
ple II owners print thè block graphics 
characters and control thè printing of 
individuai dots. This control lets you 
dump thè Apple II hi-res screen to thè 
printer. 

You tum on block graphics printing 
by sending thè printer a special set of 
characters. Ordinary characters subse- 
quently sent to thè printer are inter- 
preted as block graphics characters. 
Another special set of characters turns 
off thè block graphics printing. 

Similarly, another special sequence 
of characters signals thè printer that 
each of thè following group of charac¬ 
ters (bytes) is to be interpreted as a pat¬ 
tern of dots. The Epson print head 
consists of a single column of nine print 
needles. Each bit of a bit-plot graphics 
byte set to 1 will cause one of those nee- 
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by James Reese 


dles to strike thè paper. Since a byte 
has only 8 bits, only eight of thè nine 
needles can be controlled. Bit 0 (thè 
low-order bit) Controls thè needle that 
is second from thè bottom of thè print 
head. Bit 7 (thè high-order bit) Con¬ 
trols thè top needle. 

MX-80 owners who instali thè Graf¬ 
trax 80 option discover that, while they 
can now use thè block graphics charac¬ 
ters, they cannot get thè top print nee¬ 
dle to strike when using thè bit-plot 
graphics. What’s going on here? 

The Disappearing High-Order Bit 

Figure 1 shows why Epson owners 
without thè Graftrax 80 option cannot 
use thè block graphics characters and 
why owners with this option cannot 
use thè top needle in thè print head. 
This figure shows how thè Apple II’s 



data lines are connected to thè printer s 
data lines by thè interface board. The 
interface buffers each of thè Apple II 
data lines through a latch (Va of a 
74LS175 chip). The output of each 
latch is connected to one of thè data 
lines going to thè printer—except for 
bit 7. The output of thè latch holding 
bit 7 goes nowhere. As shown in Figure 
1 thè printer line for bit 7 is connected 
to ground. The printer sees bit 7 as 0 no 
matter what value thè Apple II puts on 
data line 7. 

Why did Epson’s engineers design 
thè interface board so that bit 7 cannot 
be controlled by thè Apple II? The an- 
swer comes from thè bit patterns that 
thè Apple II and thè Epson printer use 
to represent thè standard characters. 
The Epson printer uses a version of thè 
ASCII character code in which bit 7 of 
thè standard characters (upper- and 
lowercase letters, numbers, punctua- 
tion marks and control characters) is 
always set to 0. The printer uses bytes 
in which bit 7 is set to 1 to represent thè 
block graphics characters. Of course if 
thè Graftrax 80 option has been in- 
stalled and thè special bit graphics 
code has been sent to thè printer, then 
bit 7 Controls thè top needle of thè 
print head. 

The Apple II uses a different set of 


Address correspondence to James B. Reese , 107 
Great Falls StFaOs Church, VA 22046. 







bit pattems to represent thè standard 
characters. The Apple II text screen 
displays only uppercase lettere, num- 
bers and punctuation marks. Only six 
bits are needed to represent this set of 
characters. Bits 6 and 7 indicate 
whether thè characters are to be dis- 
played in normal, inverse or flashing 
mode. If bit 7 of a character is set to 1, 
then thè character is displayed normal- 
ly. If bit 7 is set to 0, thè value of bit 6 
determines whether thè character is to 
be inverted or flashed. Because of this 
arrangement Applesoft Basic Print 
statements generate characters with 
bit 7 set to 1. These characters are 
passed to thè Apple II monitor, which 
altere bits 7 and 6 according to thè 
print mode (either normal, inverse or 
flashing). The modified character is 
then deposited in thè Apple Ifs screen 


Figure 2. 

Use of SPDT switch to control printer bit 7. 


memory. 

If thè monitor sends a character to 
thè printer because thè output “hooks” 
have been changed (in Basic by a PR#n 
statement), then bits 6 and 7 of thè 
character will be sent unaltered. If 
such a character is sent to an Epson 
printer, it will print a block graphics 
character instead of thè desired letter, 
number or punctuation mark. Epsons 
solution to this problem was to “nail” 
bit 7 to a value of 0, so that characters 
generated by Basic Print statements 


Control Line Apple II Bit 7 Value Output 
Value Data Line Value to Printer 

0 0 0 

0 1 0 

10 0 
1 1 1 


Table 1. Control Urte valties and corre- 
sponding signal to printer. 


would print properly. 

Getting Control 

In order to use thè full capabilities of 
thè MX-80, Apple II owners need a 
way to control thè bit 7 value which is 
sent to thè printer. When you want to 
print normal characters, bit 7 of thè 
byte sent to thè printer should be set to 
0 regardless of thè value placed on thè 
Apple II bit 7 data line. When you 
want to print block graphics charac¬ 
ters or use bit plot graphics, then thè 



Figure 3. Replacing thè SPDT switch with 
two NAND gfltes. 
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With these tools you can really program! 



S-C Macro Assembler, by Bob Sander-Cederlof. Combined edi¬ 
tor/assembler includes twenty-nine commands and twenty directives; 
with macros, conditional assembly, global replace, edit, and more. Pro- 
vides new leve! of power and performance for banner and professional 
programmer alike. With 100-page manual, reference card. $80. 

S-C Assembler II Version 4.0 ; by Bob Sander-Cederlof. Combined 
source-program editor and assembler takes full advantage of Apple fea- 
tures. Many useful examples and sample programs in both thè manual 
and disk, assembles up to six thousand words a minute, may assemble 
from so uree code in memory, or from multiple sourcc file®. Older, lower- 
cost versioni fewer features, but stili powerful and practical. $55. 

Source Code for Disk Version 4.0, by Bob Sander-Cederlof. If you 
are serious about understanding assembler», or you want to make your 
own modifications, this complete commented source code for S-C As¬ 
sembler Version 4.0, on disk and ready to assemble, is for you. Requires 
ownership of Version 4.0 and signed licerne agreement. $95. 

S-C 6800 Macro Cross Assembler Modale. Owners of thè S-C Macro 
Assembler may add thè ability to develop programs for thè Motorola 
6800/6801/6802 microcomputers by buying this update package. $32.50. 

S-C 6909 Macro Cross Assembler Modale. Owners of thè S-C Macro 
Assembler may add die ability to develop programs for thè Motorola 
6809 microcomputer. Write programs for thè Stellation Mill or thè ESD 
Laboratories Excel-9 with all thè comfort and convenience of thè S-C 
Assembler li. $32.50. 

S-C Z-S0 Macro Cross Assembler Modale. Owners of thè S-C Mac¬ 
ro Assembler may add thè ability to develop programs for thè Z-80 mi¬ 
crocomputer. Write programs for thè SoftCard or other Z-80 systems us- 
ing your Apple and thè familiar, friendly environmcnt of thè S-C assem¬ 
blea. $32.50. 

S-C 69000 Macro Cross Assembler. Owners of thè S-C Macro As¬ 
sembler may add thè ability to develop programs for thè Motorola six- 
teen-bit Champion microcomputer. Use this cross assembler to pro¬ 
gram thè Digital Acoustics 68000 board or others. $50. 

Apple Assembly Line. Monthly newsletter for assembly language pro¬ 
grammerà beginner or advanced. Tutonal arride*, advanced tcch- 
niques, handy utility programs, commented listings of code in DOS and 
Apple ROMs. $15 per year; add $3 for first dass postage in U.S., Can¬ 
ada and Mexioo; add $13 postage to other countries. All back issues 
available at $1.50 each plus postage. 


Apple Assembly Line Quarterly Disks. Available to subscribers, con- 
taining source code printed in three consecutive issues of Apple Assem¬ 
bly Line. $15 each in U.S., Canada, and Mexico; $19.50 jvith corre- 
sponding issues of newsletter, other countries add $1 postage. 


Es-Cape, by Bill Linn. Full-function, interactive program editor for 
Applesoft. For painless programmine complete line editor for fast, easy 
changes; split-screen display; single-key operation; global search and re- 
plaoe; automatic line numbers; keyboard macros; and more. $60. 

Flash! by Laumer Research. Integer Basic compiler transforms your 
programs into machine language so they run many times faster. Op¬ 
tional assembly source code output for use with S-C asscmblers. Re¬ 
quires Integer in RAM or ROM to edit source programs; not required 
for compiled programs. Source code of run-time package available. 
Compiler. $79; run-time source: $39. 

Doublé Precision Floating Point for Applesoft , by Bob Sander-Ceder¬ 
lof. For thè scientist or engineer who is not satisfied with Applesoft'» 
nine-digit precision. With this 2,048-bytc machine language augmenta- 
tion package, you can get twenty-one digit precision out of Applesoft 
whenever you need it. Supports /, input, and print. Includes sub- 

routines for standard math functions. $50. 

Discari and X-ref by Bob Kovacs. Symbolic two-pass disassembler 
handles data tables, displaoed object code; lets you substitute meaning- 
ful labels of your choice. An address-bascd cross-reference table gives in- 
sight into thè inno' workìngs of machine language programs. X-Ref is a 
line number-based global cross-reference table for complete source 
documentation. Designed to compìement thè S-C asscmblers. Both on 
one disk: $45. 


S-C SOFTWARE CORPORATION 
2331 Gus Thomasson, Suite 125 
P.O. Box 280300 
Dallas, TX 75228 

(214) 324-2050 

Wa accapt Visa. MastarCard and American Expraat. 
Appiè is a trademark of Appiè Computer. Ine 
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Figure 4. 

74LS00 pin connections. 


value of thè bit 7 data line should be 
passed to thè printer. 

You can control bit 7 by installing a 
single-pole, double-throw (SPDT) 
switch between thè output of thè bit 7 
latch and thè bit 7 input line to thè 
printer. Wire thè switch so that when 
it is thrown one way thè bit 7 latch out¬ 
put is connected directly to thè printer 
input line. When thè switch is thrown 
thè other way, thè printer input line is 
connected to ground (i.e., logie 0). 
(See Fig. 2.) This scheme is clumsy 
because you must throw thè switch 
manually whenever you want to 
change from character printing to 
graphics or back. 

A better approach is to instali an 
“electrical” switch to replace thè me- 
chanical SPDT one. A logicai AND 
gate provides exactly thè desired 
capability. The output of thè AND 
gate is connected to thè printer input 



line. One input of thè AND gate is con¬ 
nected to thè bit 7 latch output, and 
thè other input is connected to a con¬ 
trol line. Table 1 shows how this line 
Controls thè value seen by thè printer 
input line. As you can see, whenever 
thè control line is set to a value of 0, a 0 


“all software that uses 
thè printer will 
function normally...” 

is sent to thè printer regardless of thè 
value of thè Apple IPs data line. When 
thè control line is set to 1, thè value 
sent to thè printer matches thè value 
received from thè Apple IPs data line. 
This is exactly thè same result as thè 
SPDT switch produced. 

Now if we can find some way for thè 
Apple II to set thè value of thè control 
line, we can control thè use of printer 
bit 7 from software. The obvious way 
is to use one of thè four annunciator 
outputs provided on thè game connec- 
tor. These single-bit outputs are con- 
trolled easily from both assembly lan- 
guage and Basic. Just connect one of 
thè annunciator outputs to thè AND 
gate input. 

TTL (transistor-transistor logie) 
AND gates are available, but not from 


all retail suppliers. It is an easy matter, 
however, to connect two NAND gates 
to form an AND gate. Since NAND 
gates are readily available, and since 
normal packaging is four NAND gates 
on a single chip, this is thè way to go. 
Figure 3 shows how to connect thè 
NAND gates logically. Annunciator 1 
(ANI in thè drawing) produces thè 
control signal. 

Heat Up thè Soldering Iron 

Installation of thè NAND gate 
switch is simplified by Epson s provi- 
sion of two sets of solder pads that con¬ 
trol how printer bit 7 is connected. As 
shown in Figure 1, thè set of pads la- 
belled P4 causes printer bit 7 to be 
grounded while thè set marked M4 
connects bit 7 to thè latch’s output. 
The printer interface card is delivered 
with a small jumper wire connected 


Figure 5. Locations ofM4 and P4 solder pads. Figure 6. Location of +5 volt solder pad. 
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1 REM ************************** 


3 REM * DEMO OF EPSON MX-SO BIT 
7 CONTROL * 


5 REM ************************** 

6 REM 

IO PR# ls PRINT CHR* <9);"80N*'; 

: REM TURN OFF SCREEN ECHO 
20 PRINT : PRINT SPC( 15); 

30 POKE 49243,0i REM BIT 7 ON 
35 PRINT CHR* <188);: REM UPPER 
LEFT CORNER 

40 FOR I = 1 TO 15: PRINT CHR* 
<172);: NEXT : REM HORIZONTA 
L LINE 

50 PRINT CHR* <180): REM UPPER 

RIGHT CORNER 

51 PRINT SPC< 15); CHR* <181); SPC< 

15); CHR* <181) 

55 PRINT SPC< 15); CHR* <181); SPC< 
15); CHR* <181): REM "BLANK" 

LINE 

60 PRINT SPC< 15); CHR* <181) 

. REM VERTICAL LINE 
70 POKE 49242,0: REM BIT 7 OFF 
80 PRINT " EPSON MX-80 
90 POKE 49243,0: REM BIT 7 ON 
100 PRINT CHR* <181): REM VERTI 
CAL LINE 

105 PRINT SPC < 15); CHR* <1B1); 

SPC( 15); CHR* <181): REM “ 
BLANK" LINE 

110 PRINT SPC< 15); CHR* <173); 

: REM LOWER LEFT CORNER 
120 FOR I * 1 TO 15: PRINT CHR* 
<172);: NEXT e REM HORIZONTA 
L LINE 

130 PRINT CHR* <165): PRINT : REM 
LOWER RIGHT CORNER 
140 POKE 49242,0: REM BIT 7 OFF 
150 PR# O 


Program Ustìng. Test program for en- 
hanced interface board. 















Your Apple Can Al ready Talk 



An exciting new 
breakthrough: 


BY MARK BARTON 


This disk can 
now make your 
computer speak! 


It’s thè Software Automatic Mouth — S.A.M. 

The brand new, all-software, high quality speech synthesizer 

from DON’T ASK. 

S.A.M. gives you: 

Unlimited vocabulary 
Full inflection at your control 
Effortless access from BASIC 
Separate pitch and speed control 
Thorough, instructive owner’s manual 
Easy-to-learn phoneme spelling System 
And automatic English-to-speech conversion 
Elaborate internai pronunciation rules for natural-sounding speech 

^ S.A.M. for thè APPLE 11/11+ includes: 

8 bit digital-to-analog converter and audio amplifier 
on a board (amplifies thè sound of all your APPLE 
games). 

I APPLE is a trademark of APPLE COMPUTER, INC. 


• S.A.M. on disk 

• Complete documentation 

• English-phoneme dictionary 

Only $124.95 



Hear S.A.M. at your favorite computer store today. 
For more Information, contact: 
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DtDIYT ASK 

COMPUTER SOFTWARE 


2265 Westwood Blvd., Ste. B-1 50 

Los Angeles, California 90064. (213) 397-8811 


Dealer inquiries welcome 

• For a copy of thè owner’s manual, specify computer 
and send $2.00 to DON’T ASK. 

• You can order S.A.M. directly from DON’T ASK. 
Add $2.00 for shipping and handling to your check or 
money order (or order C.O.D.). 

Talk is cheap 




















between thè P4 solder pads. You can 
remove this wire easily by placing thè 
tip of a hot soldering iron under it and 
lifting gently. 

The chip containing thè four NAND 
gates that should be used in this project 
is a 74LS00, available from Radio 
Shack (part number 276-1900) for 79 
cents. Figure 4 shows both thè logicai 
and physical connections you must 
make to this chip. Rather than solder¬ 
ing directly to thè chips pins, connect 
thè necessary wires to a 14-pin DIP 
socket (Radio Shack part number 
276-1999), and insert thè chip into thè 
socket. 

The location of pin 1 of thè 74LS00 
is often indicated by a small round de- 
pression on thè top of thè chip. Pins 3, 
4 and 5 of thè DIP socket should be sol- 
dered together by a small piece of wire 
beneath them. Be careful that you 
don’t accidentally connect this wire to 
pins 2 or 6. Pin 2 should be connected 
by a wire to thè left M4 solder pad, and 


Figure 8. 

Attachment of thè 74LS00 to thè board. 


Figure 7. 

Connection of control line to annundator 1. 


pin 6 to thè right M4 solder pad. Pin 7 
must be connected to ground, and thè 
right P4 solder pad provides thè perfect 
location for this. The locations of these 
solder pads are shown in Figure 5. 
They are marked clearly on thè front 
of thè printer interface board itself. 

Pin 14 of thè 74LS00 chip must be 
connected to +5 volts. A convenient 


‘ ‘A better approach 
is to instali an 
‘electrical’ switch.” 


way to do this is to solder a wire to a 
solder pad on thè rear of thè printer in¬ 
terface board. The location of thè re- 
quired pad is shown in Figure 6. The 
wire should be brought up over thè top 
of thè printer interface board to thè 
frpnt side, to be connected to thè 
74LS00 chip socket. 

Finally, connect pin 1 of thè socket 
to annunciator 1 of thè Apple II game 
connector. (Annunciator 0 can also be 
used.) The easiest way to do this is to 
obtain a 16-pin low profile socket (Ra¬ 
dio Shack part 276-1998) and a 16-pin 
wire-wrap socket (Radio Shack part 
276-1994). Plug thè wire-wrap socket 
into thè low profile socket “piggy 
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A Solution for 
Every APPLE II 


W'rite and teli us your Apple 11 application, 
and vve'll show vou a way to get taster Solu¬ 
tions from your l|/li + than you ever thought 
possible. (The info is tree.) 



The Lobero Building PO. Box 2342 
Santa Barbara, Ca. 9.1120 
(805) 986-1140 TeIex 658459 
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Maxell Floppy Disks 

The Mini-Disks 
with maximum quality. 



Dealer inquiries invited. C.O.D’s accepted. 
Cali FREE (800) 235-4137. 



PACIFIC EXCHANGES 

100 Foothill Blvd., San Luis 
San Luis Obispo, CA 93401. 
In Cai. cali (800) 592-5935 or 
(805)543-1037. 



back,” and solder a wire between pin 1 
of thè 74LS00 socket and pin 14 of thè 
wire-wrap socket. Then plug thè low 
profile socket into thè game connector, 
and plug thè Apple II game connector 
(or other connector) into thè wire- 
wrap socket. This method of connec¬ 
tion is shown in Figure 7. (The layout 
of thè Apple II game connector is 
found on page 100 of thè Apple II 
Reference Marmai.) A little cellophane 
tape around thè outside of thè game 
connector may be needed to hold thè 
low profile socket securely. 

A good place for thè 74LS00 chip is 
on thè upper right corner of thè printer 
interface board. I attached thè side of 
thè socket to thè board with a small 
piece of double-sided tape. Some types 
of clear cement would probably work 
as well. The socket is placed with thè 
pins pointing up. Pin 1 is located on thè 
right side of thè socket. Pins 1 through 
7 are on thè outside edge of thè socket, 
while pins 8 through 14 are on thè side 
closest to thè interface board. Figure 8 
shows how thè wires connected to thè 
socket can be laid out. The 74LS00 
chip should be placed in thè socket on- 
ly after all soldering is completed. 


The Software Interface 

The program listing contains a short 
program that illustrates how bit 7 can 
be controlled from within a Basic pro¬ 
gram. This program prints thè phrase 
“Epson MX-80” surrounded by a box 
produced by printing thè appropriate 
block graphics characters. Use thè pro¬ 
gram to test thè NAND gate switch in- 
stallation. 

Note that thè use of annunciator 1 
(or 0) was not selected arbitrarily. 
Whenever thè Apple II is turned on or 
reset, thè Autostart ROM sets these an- 
nunciators to 0. This ensures that thè 
Epson printer will function normally 
until a program (or immediate com- 
mand) turns thè annunciator on. So all 
software that uses thè printer will 
function normally with no changes 
required. ■ 
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ABILTTY 


Ybu Pick The Disk System, MegaFlex Controls Iti 


WITH SOFTDRIVERS FOR 
A FLEXIBLE FUTURE! 

MEGAFLEX— a universal 
floppy disk controller and 
modern alternative to thè 
Apple drive System offering 
increased Storage, im- 
proved reliability and . . 

FLEXIBILITY. 

Enjoy megabytes of 
online Storage with your 
choice of micro, mini, or 
maxi drives—or even 6Mb 
with thè Amlyn cartridge 
pack! Ideal for high- 
capacity Storage now, 
winchester-disk backup 
later. 

The MEGAFLEX secret is to autoboot soft- 
drivers that match thè needs of your drive System. 
All hardware functions are software-controlled. 
MEGAFLEX can match new drive capabilities with- 
out hardware changes. Drive-dependent ROMs 
bave been eliminated. 

APPLE ///? OF COURSE!! 

MEGAFLEX is compatible with BASIC, CP/M, 
Pascal, VISICALC, SOS and DOS-emulation on thè 
Apple III, Apple II, Franklin Ace and Basis. All lan- 



BRIDGE THE APPLE 
FORMAT BARRIER! 

The MEGAFLEX diskette 
does what Apple’s 
cannot—read and write 
diskettes from other 
computers! Software- 
controlled industry-stan- 
dard IBM 3740 or System 
34 type formats allow thè 
MEGAFLEX library of refor- 
matting software to read 
and write Altos, Radio 
Shack, Osborne, and IBM 
PC diskettes. (Cali for thè 
latest software details.) 
MORE STORAGE, MORE 
UNIVERSAL FEATURES, LOWEST COST 
MEGAFLEX with 8" maxi or high density 5.25" 
minis gives you 1.2 Megabyte of formatted data per 
diskette for 8 times thè file and data size! 
MEGAFLEX offers flexible software choices: 

• data rate (250/500 Kbits per second), 

• single and doublé density recording, and 

• single/double sided drive operation (max 
4 drives). 

MEGAFLEX has thè lowest chip count of any 
controller today! This means less power, a cooler 
guage features and operating System commands Apple and better reliability. 

(LOAD, BRUN, etc.) are standard. If you can oper- Lowest price, highest performance, that’s 
ate Apple drives you can op- a a a MEGAFLEX! 

erate MEGAFLEX! Your ET^9 11722 Sorrentovalleyroad 

Apple software will run wlth 'fylb\MHU I I 
out modification too. 


A Division of SVA 

TRADEMARKS CP/M-Digital Research 
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(619) 452-0101 
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For years, people have been 
trying to build a Setter Apple* II. 

It finally happened. 

Meet thè Apple Ile, an 
impressive new version of a 
most impressive machine. 

The “e” means enhanced. 
Which means a bundle of new 
features: 

A standard memory of 64K 
(versus 48K) that’s easily 


expandable. So you can create 
fatter files and crunch larger 
numbers of numbers. 

A new, improved keyboard, 
with a complete set of ASCII 
standard characters. Plus full 
cursor Controls, programmable 
function keys, and a rapid 
auto-repeat feature built into 
every key on thè board. 

Both upper and lower case 


characters. (And if you want 
to see more of them on thè 
screen at one time, a low cost 
80-column text card is available.) 

Improved peripheral ports. 
Which make it a lot easier to 
connect and disconnect game 
controllers, printers and all 
those other wonderful things 
that go with an Apple Personal 
Computer. 

























Except (òr thè front, 
back and inside. 
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Self-diagnostics. That’s a 
special feature that makes it 
easy to give your computer a 
thorough check-up. 

Plus an even more reliable 
design. Achieved by reducing 
thè number of components— 
which is to say, thè number of 
things that could go wrong. 


And bear in mind, thè Ile 
stili has all those other virtues 
that made thè Apple II so very 
popular. Including access to 
more accessories, peripheral 
devices and software than any 
other personal computer you 
can buy. 

So visit any of our over 1300 


authorized dealers, and see i 
newest Apple for yourself. 

Like thè originai, it s rather 
extraordinary. But then some 
things ne ver change. 

_jcippkz 

The most personal computer. 




Cali (800) 538-9696 for thè location of thè authorized Apple dealer nearest you. or for informarion regarding corporate purchases through our National Account Program. 
In California (800) 662-9238. Or write Apple Computer Ine . Advertising and Promotion Dept , 20525 Mariani Ave., Cupertino. CA 95014 ©1983 Apple Computer Ine. 
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Tutoria! 


Apple Data— 
A Bumper Crop 

The Second Harvest 


Here is thè second of a three-part 
series that explains all you’ll ever 
need to know about speeding up your file 
searches. No strings attached... 


L ast month in Part 1 I described 
several ways to find a particular 
record in sequential files and discussed 
thè advantages and disadvantages of 
each method. This month PII take a 
look at direct access files, and thè next 
article in thè series will cover indexed 
files. Please note that you usually can’t 
use thè direct access techniques dis¬ 
cussed this month on tape files, be- 
cause of thè tape files’ sequential 
nature. 

First of all, what is a direct access 
file? For thè purposes of this article, a 
direct access file is one in which you 
can find thè record you want in one (or 
only a few) disk accesses, instead of 
searching for it by reading several 
other records first, as you must in se¬ 
quential files. 

There are three types of direct access 
file that ITI consider here: thè plain old 
ordinary direct access file, which is thè 
fastest file of all for locating records; 
thè linked list file, which is most often 
used in combination with other 
schemes; and thè hashed file, which 


Peggy Bumett is a partner in thè computer Sys¬ 
tems Consulting finn of Bulgren and Bumett , 
Ine., and specializes in applications of small 
computers. She holds an M.S. degree in comput¬ 
er science , and has been a data processing con- 
sultant to small businesses since 1972. Address 
correspondence to PO Box 1355 , Lawrence , KS 
66044 . 
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uses a formula to determine where 
your record is. 

In this month’s article, as in last 
month’s, ITI use an algorithmic, or 
pseudo-programming, language in thè 
listings, leaving it to you to translate 
them into your favorite programming 
language. I like to use algorithmic lan¬ 
guage because I find thè logie flow 
much clearer than in many of thè pop- 
ular programming languages. 


‘ ‘This type of file may not 
be fancy, but it is fast! ’ ’ 


The Plain Old Ordinary 
Direct Access File 

This type of file may not be fancy, 
but it is fasti The idea is to let thè com¬ 
puter assign thè “key” or account 
number for every record, rather than 
having thè user do it. The key is thè 
value you use to specify thè record you 
want. For example, employee social 
security number is a commonly-used 


key in payroll Systems. Obviously, 
there are some applications for which 
this scheme won’t work—you can’t let 
your computer go around assigning 
new social security numbers to all 
your employees. But there are lots of 
good applications. 

Here’s how thè plain-old-ordinary 
direct access file works. Whenever 
you add another record, thè computer 
simply assigns as thè key thè physical 
location on disk where thè record will 
be. This technique guarantees that 
whenever you ask for a record by its 
key value (its location) you’ll get that 
record in only one access, no matter 
how large thè file is. The algorithms 
to add a record to this kind of file and 
to retrieve it are shown in Listings la 
and lb. 

Accesses: Only one access to find 
your record. 

Advantages: This method is fast, 
easy to program and does not use ex¬ 
tra Storage space. 

Disadvantages: Since thè computer 
assigns thè key values, you can’t access 
records with previously-existing or 
more “naturai” key values, such as 
employee social security numbers in 
our payroll example above. Also, 
when several records are deleted from 
a file you can’t compress thè file to 
save disk space, since this would cause 
all thè records’ locations, and there- 
fore their key values, to change. 




Tired of Waitìng 



THE SYNETIX SOLID STATE DISK EMULATOR 
FOR THE APPLE, INCREASES 


The Synetix Solid State SPEED UP TO 1000% ♦ mechanical disk drives. The 

Disk emulator operates identically to thè standard SSD requires no externalmodification and uses only 
disk drive, but responds much faster for programs 150 ma power supply or per board, 
using disk I/O. The SSD also saves wear on your Two Models are now available at new low prices. 

mechanical drive and diskettes. The Model 2201 (147K) single disk is now only 

The Solid State Disk Emulator is compatible with $395.00* The Model 2202 (294K) dual Disk is 
DOS 3.3, Pascal, SofTech p-Systems IV.O, IV.l, and $695.00. 

CP/M operating systems. Cali us for a complete list The Model 2201 (147K) is upgradeable to a Model 

of compatible software and benchmark results on 2202 (294K) by you or by Synetix. 



aforementioned systems. 

Database management, word prò 
cessing and file manipulation 
programs can run up to 1000% 
faster. 

A single board fits any slot 
and can respond as one or two 


Contact your locai dealer, 
or cali: 

Synetix Micro Products Ine. 
15120 N.E. 95th Street 
Redmond, WA 98052 
T800-426-7412 
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Apple and Apple DOS are trademarks of Apple Computer Ine. CP/M is a trademark of Digital Research. 
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PROCEDURE ADD; 

/* This procedure adds a data record to a plain-old-ordinary 
direct accesa file. */ 

PRINT M TYPE IN THE DATA*’; 

CALI GETANDEDIT (RECORDDATA); 

/* Cali a routine to allow thè user to type in thè data for 
this record */ 

CALI GETANAVAILABLERECORD (REC_#); /* One possible version of 

this routine is given in Listing 2b */ 

WRITE RECORDDATA AT RECORD NUMBER REC_#; 

PRINT "KEY VALUE IS ",REC_#; 

END ADD; 


Program Ustmg la Adding to a plain-old-ordinary direct access file. 


PROCEDURE RETRIEVE; 

/* This procedure retrieves and prints out thè desired data record 
in a plain-old-ordinary direct access file. */ 

INPUT "WHAT IS THE KEY OF THE RECORD YOU WANT?",REC_#; 

READ RECORD NUMBER REC_# INTO RECORDDATA; 

PRINT "HERE IT IS:"; 

PRINT RECORDDATA; 

END RETRIEVE; 


Program Ustmg Ib. Retrievingfrom a plain-old-ordinary direct access file. 


PROCEDURE INIT_LIST; 

/* Initializes a linked-list file of 1000 records. */ 

/* The first record contains infóraation about thè file, including thè 
pointer to thè beginning of thè list. */ 

RECORDCODE = 0; 

RECORD DATA = ' 1 ; /* blanks */ 

FOR REC_# = 2 TO 999 DO 
LINK = RECJf + 1; 

WRITE RECORDCODE, RECORDDATA, LINK AT RECORD NUMBER REC_#; 
NEXT REC_#; 

/* The last one in thè list has a link of '0', indicating 
that there are no more records in thè list. */ 

LINK = 0; 

WRITE RECORD_CODE, RECORDDATA, LINK AT RECORD NUMBER 1000; 

/* Now point record #1 to thè beginning of thè list */ 

RECORD CODE = 1; 

LINK = 2; 

WRITE RECORDCODE, ’XYZ COMPANY', LINK AT RECORD NUMBER 1; 

END INITJLIST; 


Program Ustmg 2a Initializing a linked list fUe. 


PROCEDURE GETANAVAILABLERECORD (REC#); 

/* Returns thè first available record from thè linked list of available 
records. This routine would be called fron a routine like thè 
'ADD' routine given in Listing la. */ 

READ RECORD NUMBER 1 INTO REC1_C0DE, KEC1JDATA, LISTSTART; 

IF LIST START = 0 THEN 
BEGIN 

PRINT ’NO MORE ROOM IN THE FILE'; 

STOP; 

ENDIF; 

REC_# = LIST START; 

READ RECORD NUMBER REC_# INTO RECORD_CODE, RECORD DATA, NEXT_AVAIL; 
LISTSTART = NEXTAVAIL; 

WRITE REC1C0DE, REC1DATA, LISTSTART INTO RECORD NUMBER 1; 

END GETANAVAILABLERECORD; 


Program Ustmg 2b . Getttng a record from thè linked list of available records. 


One other disadvantage occurs if 
you choose to reuse thè space freed up 
by a deleted record. Suppose you de- 
lete record 601, which contained in- 
formation about John Jones, and re¬ 
use thè space for Fred Smith’s data. If 
your business partner then, looking at 
yesterday’s master list, decides to 
change John Jones* address and modi- 
fies thè data for key 601, Fred Smith’s 
mail will start going to John Jones* 
house. 

However, this disadvantage can be 
fixed by having your programs dis¬ 
play thè customer’s name (or other 
appropriate fìeld) whenever a user 
tries to update or delete a record. Or, 
you can make thè key for John Jones 
601-J, J being thè first letter of Mr. 
Jones’ last name. Then when he is de¬ 
leted and Mr. Smith is added, Mr. 
Smith’s key value ,(601-S) won’t be thè 
same as Mr. Jones* was. 


Storage Allocadon in 
A Direct Access File 

Remember thè sequential files we 
talked about last month? In such a file 
you just add to thè end of thè file to 
store more records. To delete records 
you can just mark them as deleted, 
and then every so often compact thè 
file by copying only thè non-deleted 
records to a new disk. 

You can add new records to thè end 
of a direct access file too. But, as I 
pointed out before, you can’t com- 
press thè file to avoid wasting Storage. 


Another Way: The Linked List 

The linked list is a way to organize 
your data in thè order you need it. 
One particularly good application is 
in managing thè available records in a 
direct access file. 

Each record in a linked list consists 
of a record code field (that tells you 
what kind of record it is), thè record’s 
data and a “link** (pointer) to thè next 
record in thè list. You also need a be¬ 
ginning to your list, in an easily found 
place. I usually reserve record §\ in 
my file to store a pointer to thè begin¬ 
ning of thè list, and maybe other in- 
formation about thè file too, like thè 
company name and address. There*s a 
picture of a linked list in Figure 1. 
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In The Beginning 
Was The 
Word. . . 


MICROCOCCUS*MICROLITER 


micrococcus, mi kro kok us, n. a microscopie organism 
of a round form. 

Microcomputing, mi’ kro kom put ing, n. (Gr. mikros, 
small, and L. computo, to calculate.) The multi-system 
monthly journal for computer enthusiasts, containing 
all thè information needed to turn your microcomputer 
into a powerful machine. Includes dozens of new pro- 
grams, articles on innovative computer applications, 
buyer s guides, new programming techniques, accurate 
reviews of hardware and software, complete coverage of 
new produets, tips on your system’s hidden capabilities, 
hardware modifications, tutorials, Utilities, book 
reviews, industry news. Plus features on computers in 
business, Science, education and games. Written in 
understandable language by experts in thè field of com¬ 
puting. Special emphasis is placed on thè Apple* Atari, 
Commodore, Heath and IBM systems, but not to thè ex- 
clusion of other systems. 

(Ed. note—A one year subscription to MICROCOM- 
PUTING is only $24.97. Cali 


Or send in thè coupon below. 

microcopy, mi’ kro kop i, n. A photographic copy of 
printed material or photographs. . . 


MICROCOMPUTING 


The First Word in Computer Publishing 

* Apple® is a registered trademark of Apple Computer, Ine. 


YES! I want to get thè First Word in Computer Publishing. Send me 12 issues of MICROCOMPUTING for only 
$24.97. □ Check enclosed □ MC □ VISA □ AE □ Bill me 








In Figs. 2a through 2d thè first field in each 
record is thè record code. Available records 
are denoted by a record code of 0, thè first 
record in thè file has a record code of 1, and 
regalar data records are denoted by record 
code 2. 


Heres how to use a linked list to al¬ 
locate records in a direct access file. 
First, before you input data, build 
(initialize) a file of about thè right 
number of available records, all 
linked together. A diagram of this 
procedure appears in Figure 2a and 
thè algorithm appears in Listing 2a. 

Whenever you wish to add a data 
record to your file, just assign it thè 
first record in thè linked list of avail¬ 
able records. This means you must re¬ 
move that record from thè linked list, 
leaving thè one it pointed to as thè 
new first one. The results of this ma- 
neuver are shown in Figure 2b where 
record #21 is thè first available rec¬ 
ord, and thè record it used to point to 
is record #32. Record #21 is removed 
from thè list, making record #32 thè 
new first available one, and #21 can 
now be filled with data. The algo¬ 
rithm is in Listing 2b. 

When you delete a record thè space 
it occupied can be returned to thè 
linked list of available records (Figure 
2c), making it thè first one in line to be 
used when another data record is add- 
ed. See Listing 2c for thè algorithm. 

Now remember, when you origi- 
nally set up thè file you had to guess 
how many records you would need. 
When in doubt guess too few, because 
it’s easy to enlarge thè file—just add 
more records to thè list. Figure 2d 
shows thè before and after versions of 
a file that had to be enlarged. The 
algorithm is given in Listing 2d. 

The linked list has lots of other ap- 
plications too. For example, you can 
use it to link together all of a particu- 
lar account’s transactions. In that 
application, every time a new trans¬ 
action is entered you look up thè cus- 
tomer record (using thè plain-old-or- 
dinary direct access method) and add 
thè new transaction to thè front of his 
transaction list. Each customer will 
have his own list of transactions, mak¬ 
ing interactive inquiry of his account 
easy to program and efficient to run. 
Refer to Figure 3 for a picture of this 
application. 

The applications are endless. 
Linked lists can help avoid sorts (since 
they maintain things in thè order you 
want them), can save search time and 
do not require much extra Storage. 
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Figure 1. Representation of a linked list file. 



RECORD #2 RECORD #3 RECORD #4 RECORD #1000 


Figure 2a. Initializing a linked list file. 
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PROCEDURE RE TURN_RE C ORD (REC_#); 

/* Returns a record to thè list of available records */ 

READ RECORD NUMBER 1 INTO REC1CODE, RECI DATA, LIST_START; 

/* Now make thè data record an available one, and point 
it to thè previous beginning of thè list */ 

RECORD_CODE =0; 

RECORDDATA = ’ ' ; /* blanks */ 

LINK = LIST_START; 

WRITE REC0RD_C0DE, REC0RD_DATA, LINK AT RECORD NUMBER REC_#; 

LIST START = REC/* The returning ree becomes thè new 
start of thè list */ 

WRITE REC1C0DE, REC1JDATA, LIST_START AT RECORD NUMBER 1; 
END RETURNRECORD; 


Program listing 2c. Returning a deleted data record to thè linked list of available records. 


PROCEDURE EXPAND_LIST (OLD_FILESIZE, NEWJFILESIZE) ; 

/* Expands a linked-list file of available records */ 

REC0RD_C0DE = 0; 

RECORD DATA = ’ ’; /* blanks */ 

FOR REC_# = (OLDFILESIZE + 1) TO (NEW FILESIZE - 1) DO 
LINK = REC_tf + 1; 

WRITE REC0RDC0DE, RECORDDATA, LINK AT RECORD NUMBER REC#; 

NEXT REC Jh, 

/* Point thè last record we’re adding to thè previous start of 
thè list, and make thè new start of thè list thè Ist 
record we added. */ 

READ RECORD NUMBER 1 INTO RECl_CODE, RECITATA, LIST START; 

LINK = LIST_START; 

WRITE REC0RD_C0DE, RECORDDATA, LINK AT RECORD NUMBER NEW_FILESIZE; 
LIST_START = 0LD_FILESIZE +1; 

WRITE RECI CODE, RECITATA, LISTSTART AT RECORD NUMBER 1; 

END EXPAND_LIST; 


Program listing 2d. Expanding a linked list file. 


DEFINE FUNCTION HASH (KEY_VALUE); 

/* This function takes a key_value of 10 characters, treats each v 
character as a binary number, sums them up, divides by thè 
filesize (1000 records), and returns thè remainder */ 

SUM = 0; 

FOR N = 1 T0 10 DO 

SUM = SUM + (BINARY VALUE 0F N'TH CHARACTER 0F KEYVALUE); 
NEXT N; 

HASH = REMAINDER (SUM / 1000); 

END HASH; 


Program listing 3a. Hashing algorithm for nùmeric or alphahetic key values. 


DEFINE FUNCTION MID_SQUARES (KEYVALUE); 

/* This algorithm takes thè middle 3 digits of a 10-digit numeric 
key, squares that number, and takes thè middle 3 digits 
of thè result and squares it again. The middle 3 digits of thè 
final result is thè record number returned. */ 

X - MIDDLE 3 DIGITS OF KEY_VALUE; 

FOR N = 1 TO 2 DO 
X = X ** 2; 

X = MIDDLE 3 DIGITS 0F X; 

NEXT N; 

MIDSQUARES = X; 

END MIDSQUARES; 

/* For those of you who don't like thè wording 'Middle 3 Digits of X* 
above, thè formula: 

X = INT (X/1000) - [(INT (X/1000000)) * 1000] 
is equivalent. */ 


Program listing 3b. j A mid-squares hashing algorithm. 


You can add a pointer to thè end of 
thè list so you can add new records 
there, too (Figure 4a). You can link a 
list in a circle so you can find thè begin¬ 
ning of thè list from any point in it 
(Figure 4b), and you can link it both 
forward and backward maldng it pos- 
sible to traverse thè list in either direc¬ 
tion (Figure 4c). 

But bef ore you get too carried away 
with linked lists, let me point out that 
there are poor application. One 
would be linking all your customer 
records together in alphabetical or- 
der, thereby eliminating alphabetical 
sorts. Just think about this for a min¬ 
ute. Every time you added a new cus¬ 
tomer you’d have to follow thè links 
until you carne to thè right place for 
that person. This would average out 
to one half thè length of thè file. In 
other. words, this would amount to 
thè same as à sorted sequential file, 
except you couldn’t even do a binary 
or interpolation search on it. 

Accesses: When used properly, thè 
linked list type of organization en- 
ables you to retrieve a record in only 
one access. 

Advantages: It’s fast and not diffi- 
cult to program. The only extra Stor¬ 
age required is a pointer field in each 
record—usually small enough to 
make little or no difference in thè to¬ 
tal number of records actually used. 

Disadvantages: Unlike sequential 
and plain-old-ordinary direct access 
files, in which each record has no re- 
lationship to any other record, linked 
list records do point to others. (This is 
not unique to linked list files. Indexed 
files also have interrelationships be- 
tween records.) 

Linked List Rules 

So what? Well, in theory this 
would be no problem. But thè world 
of computers is not bug-free, and if 
bad things happen to one record, 
others may be affected. Whether thè 
cause is a program bug, a loss of 
power or a disk error, many a sadder- 
but-wiser user will testify to: 

Rute §1 : That which is hooked to¬ 
gether can become unhooked. Cus¬ 
tomer A can point over to thè middle 
of Customer B’s transactions, records 
can point to themselves, some records 
might even get lost (not be pointed at 
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$ 929.88 UPS DELIVERED 

• 160 characters per second, bi-directional, logic-seeking printhead action 
with 80 & 40 cps hi-res correspondance print modes 

• 9x9 matrix produces correspondance, 10, & 1 7 cpi with true descenders; 
doubi^width & download option for character sets standard 

• Subscripts, superscripts, underlining, backspace, & forms control 

• Friction & pin feed paper handling takes up to 3-part forms {8.5”) 

• Centronics parallel or RS-232C interfacing (specify) 

Microline 93 (136 columns).$929.88 


The Franklin ACE 1000 


An Apple-compatible Personal Computer 



The Franklin ACE f 000 includes 64K RAM, upper/lower case character set (40 
columns), hi-res graphics, numeric keypad, 8 peripheral slots. joystick/paddle con- 
nectors, and a built-in cooling fan. The Franklin ACE 1OO0 has full hardware/ 
software compatability with all existing Apple II® products. 

Our special package price includes The Franklin ACE 1 0OO, one ACE 10 disk 
drive with a drive controller card, thè P/-4 9” Amber Monitor, and ACE WRITER a 
$100 word processing program 

All for only $1 529*64 f UPS delivered 


PRINTERS 


Anadex DP-9501A. $ 1409.80 

Anadex DP-9620A. $ 1499.88 

C. Itoh 

C. Itoh Prowriter. $ 499.88 

W/RS-232C. 5609.88 

C. Itoh Prowriter 2. $ 734.88 

W/RS-232C. $ 789.88 

C.ltoh F-1 0 Starwriter 40 cps 
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F-1 0 Tractor. $ 289.88 

Daisywriter 

Daisywriter 2000. $ 1089.88 

Daisywriter Tractor. $ 149.88 

Daisywriter Cable. $ 49.88 

Diablo 

Diabio 620. $ 1269.88 

Diablo 630. $ 1969.88 

Diablo 630 KSR. $ 2694.88 
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DMP-85 Printer.. $ 469.88 


Star Micronics 



Gemini 10. $ 419.88 
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IDS Prism 80. $ 1104.88 

above w/graphics. $ 1189.88 

above///sheetfeed. $ 1294.88 

above w/4-color. $1 939.88 

IDS Prism 132. $ 1269.88 

above w/graphics. $ 1339.88 


PRINTERS 
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132 w/sheetfeed. 

$1499.88 

above w/4-cofor. 
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IDS Microprism. 

$679.88 
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Microfine 82A .... . 

$429.88 

82A Plug-n-Play (PC). 

80/82A Tractor. 

$39.88 

$99.88 

82A Roll Paper Holder 

$49.88 

Microline 83A. 

$689.88 

82A/83A Okigraph ROM .. 

$44.88 

Microìine 84 w/graphics & tractor 

Parallel. 200 cps. 

$1039.88 

RS-232C, 200 cps. 

$1148.88 

NEC 

NEC 3510. 

$1929.88 

NEC 3530 . 

$1809.88 

NEC 3550 . 

$2199.88 

3500 Tractor . 

$239.88 
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NEC PC-8023A. 

$509.86 

Qume 

Qume Sprint 9/45 . 

$2109.88 

Smith-Corona 

Smith Corona TP-1 . 

$599.88 
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& paraflel or RS-232C interface 
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USI Pi-3 {1 2 " amber). $ 189.88 

USI Pi-4 (9" amber). $ 199.88 

Amdek 

Amdek 31OG (12" green) .. $ 199.88 

Amdek 310A (1 2" amber) ... $ 199.88 
AmdekColorlI {Hi-res RGB) $ 769.88 

Amdek Color III (RGB). $ 479.88 


Electrohome 

Electrohome 1 (RGB). $ 329.88 

Electrohome 2 (Hi-res RGB) $ 579.88 
PC Cable. $ 49.88 


NEC 

JB 1203 (RGB) . 
JB 1210 (Compì 


$ 799.88 

$ 364.88 


MODEMS 

DC Hayes 

Hayes 300 Baud. $ 234.88 

Hayes 1200 Baud. $ 969.88 

Hayes Micromodem II. $ 289.88 

above, w/software. $ 319.88 

Novation 

Novation 103 SmartCat $ 224.88 
Novation 103/212 SmartCat. . $ 909.88 
Novation Apple Cat 300 . $ 334.88 

Novation 300-1 200 Kit .$ 324.88 

Novation Apple Cat 1200 .. $ 979.88 

Novation Cat. $ 199.88 

No^ation D-Cat $ 199.88 

Novation J-Cat .............. $ 139.88 

Multì-L ne Junction Box....... $39.88 


Information & Orders 

( 603 )- 881-9855 

Orders Only: (800)-343-0726 

No Hidden Charges 

FREE UPS shipping on all orders—No extra charge to use credit 
cards—All equipment shipped factory fresh with manufacturer’s war- 
ranty—COD orders accepted ($10 fee added)—No purchase orders 
accepted—No foreign or APO orders accepted—Minimum $50 per 
order—This ad prepared in December: prices are subject to change. 


APPLE HARDWARE 

PKASO Smart Interfaces 

For Appie/Franklin Centronics parallel 

output. Specify C.ltoh. Centronics, 

Epson, IDS* NEC or Okidata prìnters. 

PKASO card & cable. 

$ 139.88 

*IDS Color card & cable.... 

$ 199.88 

Parallel Card w/cable. 

$ 89.88 

Corona Data Systems 

5mB Hard Disk. 

$ 2049.88 

10mB Hard Disk. 

$ 2499.88 

Microsoft 


Premium Package—A 16K RAMCard, 

Z80 SoftCard, Videx VideoTerm 

w/soft video switch, & CP/M 


Users Guide. 

$ 499.88 

Z80 SoftCard. 

$ 239.88 

16K RAMcard. 

$ 159.88 

Mountain Computer 

5mB Hard Disk. 

$ 2364.88 

10mB Hard Disk. 

$ 2829.88 

Card Reader. 

$ 1399.88 

CPS MultiFunction. 

$ 169.88 

A/D—D/A Convertor. 

$ 304.88 

RAMpius + 16K. 

$ 199.86 

RAMplus + 32K. 

$ 179.88 

ROMplus 4-. 

$ 139.88 

RÓMwriter Card. 

$ 194.88 

SuperTaiker. 

$ 174.88 

Orango Micro 


Grappler +. 

$ 149.88 

Practical Peripheral» 

16K Microbuffer II. 

$ 219.88 

32K Microbuffer II. 

$ 249.88 

Rana Systems 


Elite 1 Disk Drive. 

$ 299.88 

Elite 2 Disk Drive. 

$ 509.88 

Elite 3 Disk Drive. 

$ 659.88 

Disk Controller.. 

$ 109.88 

Saturn Systems 


32K RAM Board. 

$ 199.88 

64K RAM Board. 

$ 344.88 

128K RAM Board. 

$ 484.88 

SSM 


AIO Multì-Function Card .. 

$ 199.88 

Videx 


VideoTerm. 

$ 239.88 

VideTerm Combo. 

$ 259.88 

Enhancer il. 

$ 114.88 

Vista 


A-800 Disk Controller 


for 8" disks. 

$ 399.88 

Vision 80 Card. 

$ 269.88 



HIGH TECHNOLOGy AT AFFORDABLE PRICES 

THE BOTTOM LINE 

NH 03055-0423 
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ELECTRONICS, INC. 

COPYRIGHT © 1981 - PATENTS PENDING 

566 Irelan, Buellton, CA 93427 
(805)688-2047 

8:00 TO 5:00 CALIFORNIA TIME 


SUPER FAN II 

FOR YOUR APPLE II * COMPUTER 


COMPUTER PRODUCTS 

DESIGNING • MANUFACTURING 
ELECTRONIC ENGINEERING 


TM 




One Year Warrant y 

$ 74.95 

With Zener Ray™ 
Protection $109.00 


MASTERCARD — VISA 


‘■COOL IT” 


I 



B 1 

fì 


a 

y 





TWO EXTRA 
120 VOLTOUTLETS 


• ALSO FITS ON APPLE’S* NEW MONITOR STAND 

• RED PILOT LIGHT ON/OFF SYSTEM SWITCH 

• CLIPS ON — NO HOLES OR SCREWS • REPLACEABLE SWITCH 

• AVAILABLE IN 120V or240V AND 50/60 HZ • DURABLE MOTOR 

• REDUCES HEAT CAUSED BY EXTRA PLUG-IN CARDS 

• SOLD WORLD WIDE • UNIQUE 1 YEAR WARRANTY 

• TAN OR BLACK COLOR • QUIETEST FAN ON THE MARKET 

• INCREASED RELIABILITY — SAVES DOWN TIME AND REPAIR CHARGES 

• LOW NOISE DUE TO DRAWING EFFECT OF AIR THROUGH YOUR COMPUTER AND SPECIAL FAN AND MOTOR DESIGN 

• TWO EXTRA 120V OUTLETS FOR MONITOR AND ACCESSORIES TURN ON WHEN YOU TURN ON YOUR FAN 
(NOT AVAILABLE ON 240V MODEL) 

SUPER FAN II™ WITH ZENER RAY OPTION $109.00 

ZENER RAY™ TRANSIENT VOLTAGE SUPPRESSOR 

OUR BUILT IN ADVANCED DESIGN UNIT GIVES 
DRAMATIC COST SAVINGS — STOPS ANNOYING DOWN TIME 
INSURANCE FROM VOLTAGE SPIKES - GLITCHES 

DANGEROUS VOLTAGE SPIKES CAN JEOPARDIZE YOUR COMPUTER SYSTEMS 
PROTECT COMPUTER - DISK DRIVE - PRINTER AND MONITOR 

NO CUTTING WIRES • WON’T VOID WARRANTY, JUST PLUG IN SUPERFAN II WITH ZENER RAY 

OTHER PRODUCTS BY ^Electronics, inc. 

SUPER RAM II™ 16K RAM CARD FOR YOUR APPLE II. 2 YEAR WARRANTY $125 
GUARDIAN ANGEL™an uninterruptable powersource $595 
12 VOLT TRANSVERTER 12 volt —runs your apple 11 computer and 

AND5V4" DRIVE FROM YOUR CIGARETTE LIGHTER $14.9 

*Registered trademarks of Apple Computer Ine. 


Circle 87 on Reader Service card. 





















by anything), and so on. 

However, help is on thè way in thè 
form of: 

Rule §2: Update your files in such a 
way that your existing records are 
protected. Let me illustrate. Consider 
thè following algorithm: 

1. Get record $Ys pointer to thè 
first available record. 

2. Read thè first available record. 

3. Enter data into it and change its 
record code. 

4. Write it back into thè file. 

5. In record #1, change thè pointer 
to thè next available record and write 
it back into thè file. 

This will work unless thè power 
fails after step 4. In that case, thè 
pointer in record §1 designates a rec¬ 
ord that is actually no longer avail¬ 
able. When you bring thè computer 
back up youll have to find where thè 
next available record really is and fix 
thè pointer in record #1. You can 
avoid this problem by placing step 5 
after step 2. This way you never, not 
even for an instant, allow any incor- 
rect or incomplete links in your file. 
The worst that could happen in thè 
event of a power failure or other dis- 
aster would be for thè next available 
record to be removed from thè list but 
not used—an event so minor it would 
never be noticed. 

Rule §3: Check after every read to 
be sure thè record you got is thè one 
you expected. Available records 
should have a record code field that is 
different from thè one used by trans¬ 
action records, which in turn is differ¬ 
ent from that of customer master rec¬ 
ords. Storing thè customer key value 
in every customer and transaction 
record will also help. These values can 
all be double-checked after every read 
to be sure you got thè type of record 
you were expecting. 

Sometimes, in spite of all your pre- 
cautions, your links get into a hopeless 
tangle. This leads us to: 

Ride #4: Back up your files religious- 
ly. By religiously I mean every day you 
use thè disk. Then, should all else fail, 
you can restore from backup. 

If you follow thè above rules, you 
can have successful linked list files. 
And remember, these same rules are 
quite applicable to all files, no matter 
which type of organization you use. 


9EFORF 



RECORD #1 RECORD #1000 


AFTER: 



RECORO #IOOt RECORD #1002 RECORO *(003 RECORD #1100 


Figure 2d. Enlarging a linked listfUe. 



Figure 3. Linked lisi file of customer account transactions. 



Figure 4a. Adding a link to thè end of a linked list. 



Figure 4b. Circular linked list. 
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The Hashed File 

The hashed file is a direct access 
file in which you use a formula on thè 
key value to determine thè location 
of a record. This allows you to use 
“naturai” key values, like employee 
name or social security number, in- 
stead of having to know thè record 
number, as in thè plain-old-ordinary 
direct access file. There are lots of 
variations of this method. ITI illus¬ 
trate with a simple one. 

Hereswhat you need for a hashed file: 

• You need a formula to compute thè 
location of a record based on its key 
value. We’ll cali this formula a hash- 
ing algorithm. Now, thè ideal hashing 
algorithm would compute a different 
location for every different key value. 
Then you could always get thè record 
you wanted in oniy one access. 
However, we usually can’t achieve 
this goal without using ridiculous 
amounts of disk Storage. So, if we 
can’t have an ideal hashing algo¬ 
rithm, we’ll settle for a good one. 

Good hashing algorithms distribute 
thè records fairly evenly throughout 
thè file. They usually include an ar- 
ithmetic division by thè number of 
records in thè file. Three hashing al¬ 
gorithms that work well in most cases 
appear in Listings 3a, 3b, and 3c. 

• Another thing you need for a 
hashed file is a way to determine if a 
location is presently filled with data. I 
like to use record codes for this pur- 
pose, just as in linked list fìles. This 
means you must initialize thè file with 
thè code for available record in every 
record. See Listing 4 for thè simple 
algorithm. 

• You need a way to handle thè “hash 
clash.” A hash clash happens when 
you compute thè location to insert a 
record in your file, but that location is 
already full. One solution is to read 


DEFINE FUNCTION MOD (KEYVALUE); 

MOD = REMAINDER (KEY_VALUE / 1000); 
END MOD; 

Program Ustmg 3c. The Mod hashing algo¬ 
rithm—thè remainder of thè key vaine di- 
vided by thè number of records. 


Type of File 

Comments 

Average Number of Accesses 
In a 1000-record File 

If record is If record not 

in thè file. in thè file. 


i 

. 

SEQUENTIAL FILES 
see Part 1 of thè series): 

Sequential search in 
an unsorted file. 

Also suitable for tape files. 

500 1000 

Sequential search in 
a sorteci file. 

Also suitable for tape files. 

500 500 

Binary search in 
a sorteci file. 


11 11 

[nterpolation search 
in a sorted file. 

Distribution of data in thè 
file must be known. Prin- 
ciple can be adapted to 
some extent for tape. 

5 5 

Partitioned file 
[unsorted). 


100* 200* 

DIRECT ACCESS FILES: 

Plain old ordinary 
direct access file. 

The computer assigns thè 
key value. 

1 1 

Linked list. 

Used to organize your rec¬ 
ords in thè order you 
want them. 

1 or more 1 or more 

Hashed file. 

A formula is applied to 
thè key value to compute 
thè record’s location. 

ìw * 3** 

* Assuming file is divided into 

* * Assuming file is 2 A full of data. In this example, this means 


Table 1. Summary of file access methods covered 


PROCEDURE INITHÀSHED FILE; 

/* Initializes all records In a 1000-record hashed file 
to ’available' */ 

RECORDCODE = 0; 

FOR REC_# = 1 TO 1000 DO 

WRITE RECORDCODE AT RECORD NUMBER RECJ/; 

NEXT REC#; 

END INITJHASHEDFILE; 

Program listing 4. Initializing thè record codes of all records in a hashed file, signifying they are 
available for data. 
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Advantages 

Disadvantages 

1. Easy to program. 

2. No extra Storage needed. 

1. Very slow. 

1. Easy to program. 

2. No extra Storage needed. 

3. Better than thè sequential search 
in an unsorted file, if thè record 
is not in thè file. 

1. Slow. 

2. File must be sorted whenever 
additions are made. 

1. Not difficult to program. 

2. Quite fast. 

3. No extra Storage needed. 

1. File must be kept sorted. 

1. Fastest method for sorted 
sequential files. 

2. No extra Storage needed. 

1. File must be kept sorted. 

1. Easy to program. 

2. File does not have to be sorted. 

1. Extra Storage may be needed. 

1. Easy to program. 

2. No extra Storage needed. 

3. Fast! 

1. “Naturai’* keys can’t be used. 

2. Storage management may be more 
compie*. 

1. Very little extra Storage needed. 

2. Helps avoid sorts. 

1. More precautions must be taken 
in programs to keep links from 
getting all tangled up. 

1. Easy to program. 

2. Fast. 

1. Wastes Storage space. 

2. Cannot produce ordered reports without 
sorting first. 


5 partitions of 200 records each. 


that 1500 records would be needed to store 1000 records of data. 


in Pari 1 (last month) and in Pari 2 (this month). 



sequentìally from that location until 
you do find an available location. 

For example, suppose you have a 
1000-record employee file, and you 
want to use social security number as 
thè key. First, you use thè algorithm 
in Listìng 4 to initialize all 1000 rec¬ 
ords as available. Then, to add an em¬ 
ployee to thè file you apply a hashing 
algori thm to thè social security num¬ 
ber to determine where in thè file to 
place that record. La ter, to look up 
that same employee in die file, you 
apply thè same hashing algori thm to 
thè social security number again to 
find out where you put thè record 
earlier. 

In this example, let’s use thè Mod 
hashing algori thm (Listing 3c). If die 
social security number is 282-06-2472, 
thè hashing function will computer 
record § - remainder of (282662472/ 
1000) -472, So your employee’s data 
goes into record #472. 

Accesses: The ideal number of ac- 
cesses is one. The actual number de- 
pends upon whether you choose a 
hashing algori thm that distributes 
your key values well, and how full of 
data thè file is. A file 99% full of data 
is much more likely to have hash 
clashes than one that is only half full. 

Adoantages: A hashed file enables 
you to get to your record in one or at 
most a few accesses, but is stili qui te 
simple to program and maintain. 

Disadvantages: Hashed files that 
get too full usually have too many 
clashes for efficient accessing. Thus, 
you should keep thè physical file big 
enough to be only to 3 A full. This 
results in a fair amount of wasted Stor¬ 
age space—storing 1000 data records 
in a file % full would require 1500 
records. Another disadvantage is that, 
although this ldnd of file or ganizatìon 
can be very efficient for looking up in¬ 
dividuai records, thè file must besort- 
ed first to produce ordered reports 
such as alphabetical lists. 

Summary 

These direct access file organiza- 
tion techniques—thè plain-old-ordi- 
nary, linked list and hashed—can 
produce very fast accesses for indivi¬ 
duai records, but often fall short in 
producing sorted reports. Next 
month. 111 talk about indexed files. ■ 
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People & Places 


Fair Game 


The San Francisco Applefest was a 
good example of what is good, and 
what is bad, about a computer fair. 


by Hartley G. Lesser 
Technical and Review Editor 


U ntimely. Decidedly so. The 
November 1982 San Francisco 
Applefest was held weeks ago. There 
were no major announcements, and 
what little new software was displayed 
is old hat by now. With COMDEX, a 
showcase of glitter and big money, on- 
ly one week away, who could blame 
thè exhibitors for remaining close- 
mouthed about their new products. 

However, to ignore thè SF Applefest 
would be a disservice. Regardless of its 
lack of flair, thè exhibition was not to 
be missed. Why? The appellation Test 
denotes a happy gathering, and those 
Apple fans seemed to enjoy all four 
days. For hours at a time thè walkways 
were clogged with computerphiles 
pressed dose to see this demonstration, 
or grab that free poster or button. A 
spirit of amiability prevailed. 

Unfortunately, this benevolence 
seemed not to include thè Test opera- 
don. The callous behavior of “assist- 
ants,” who demanded cash payments 
to unload vehicles laden with hard¬ 
ware and software, angered exhibitors 
weary from travel and eager to set up 
their wares. Those who refused to, or 
could not, pay thè fee had to manage 
by themselves in thè midst of a torren- 
tial downpour. In addition, they felt 
obliged to hush talk of water-ruined 
equipment, fearing damaged booths if 
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“... those Apple 
fans seemed to 
enjoy all 
four days.” 


thè wrong person overheard their 
grumblings. 

The lack of courtesy did not end 
there. Access to thè lower exhibition 
area of Brooks Hall, thè Test location, 
was via a large ramp, down which 
vehicles could be driven to an unload- 
ing point on thè exhibition floor. Many 
exhibitors wished to take advantage of 
this access. Yet, when several cars used 
thè rampway, a loudspeaker blared in- 
to life, threatening smashed wind- 
shields and headlights if thè vehicles 
weren’t quickly moved. 

Upon arrivai at their designated 
booth areas, some exhibitors found 
folding tables already in place. Think- 
ing these tables were part of thè origi¬ 
ni fee paid for thè booth, they put 
them to use. Actually, this was nothing 
more than thè old bait and switch rou¬ 
tine—leave something in an area that 
originally had nothing, deceive thè ex- 
hibitor into thinking he or she has 
already paid to use thè item, and then 


charge an inflated price for its use later 
on, during thè intensity of thè fair. You 
can imagine thè constemation of folk 
who had already paid thousands of 
dollars to exhibit at thè show. One 
dealer was advised by a Test officiai 
that he could extend his booth into an 
adjoining vacant section. Due to thè 
press of business, thè exhibitor didnT. 
He was lucky, for he leamed later 
there would have been an additional 
$900 charge had he done so. 

I won’t bother discussing thè pay¬ 
ments necessary for a booth to be taken 
down after thè show closed. Also, ex¬ 
hibitors had to sit around, some for 
several hours, awaiting thè officiai 
booth dismantlers to do their work. 
Many dared not even touch their booths 
during this time, for fear their booths at 
future shows would come to harm. 

Then there was thè software com¬ 
pany, with a prominent position at thè 
halFs entrance, demonstrating a very 
popular arcade game on a wide screen 
TV. Tucked away in thè base of thè 
TV projection System, where few 
would see it, was thè Atari System used 
to run thè game. Unfortunately, many 
believed this game to be thè Apple ver- 
sion, and purchased thè Apple version 
software in thè belief that what they 
bought was what they had seen. There 
should have been a sign that it was thè 





NOW HERE POR YOIIR APPLE: 

A CARD THAT BLOWS ALL THE OTHERS AWAY! 


• LOADS OR SAVES a FULL VlSlCALC ’ MODEL IN 20 SECONDS. 
(NOT 16 MIMTES LIRE THE OTHERS) 

• 156K POR a VisiCalc model. 



.. 


.A 1 ®' 


* ,f 


Super-fast phantom disk drive. 
• Priced under $500. 




m 

ìuiu givc yuui ^cn me puwcr 

to run large, VisiCalc models 
without wastinj 
see, Super Expander loads a 


** ^ ft ’ 

y$-'*y / r' r ' f. * >. Finally. It’s all together. A superb quality 128K card, 

* y'\ * .. ' y"? thè Ramex-128 1 ' 1 . The card that doesn’t require 

y*V you to go pokingabout on thè motherboard, 

* - .** >£- ^ ^ pulling chips, installing a strap, etc. 

\ ^ ^ .• The fìrst card that comescomplete with 

•' \ incredible disk emulation software, 

r-y y t'Z* • includingeight new DOScom- 

* * y ,♦* mands. And thè first 128K 

* v '- .** * V^Br &(' card for less than $500. 






$64.95. Get them both at your locai dealer or direct. 


.ano 

MasterCard and Visa holders order toll-free, 1-800-835-2246. 
Dealer inquiries invited. 


% ■ 


VisiCalc is 
a registered 
trademark of 
VisiCorp. Apple is a 
registered trademark 
of Apple Compoter, Ine. 
Ramex>128 is a trademark 
of Omega MicroWare, Ine. 


Under $500. What are you waiting for? 


CA/W 

OAAEGA AMCROWARE, INC 

222 SO. RIVERSIDE PLAZA- CHICAGO, IL 60606 • 312-648-4844 

Circle 20 on Render Service card. 




Atari version being exhibited, or else 
both versions should have been run- 
ning simultaneously. Perhaps a recent 
review of thè Apple version explains 
why thè company decided to follow 
this strategy at thè Test. 

Sound all bad? Not really. The ’fest’s 
officiai hotel was probably thè worst 
experience of all. There was a charge 


for parking, in addition to outrageous 
room prices, and thè parking lots were 
situated anywhere from a half block to 
three blocks from thè hotel entrance. 
To be quite honest, Mission Street in 
San Francisco is not thè finest area to 
be walking in at night. The rooms all 
had Central Annoyance, consisting of 
pipes that wailed like bagpipes when- 
ever hot water was drawn in an adja- 
cent room. Plaster was peeling; and 
lost items were, strangely, never 
found. 

But when thè Test was open and 
rolling and thè “peripherals” could be 
forgotten, it was a different world. 
One of thè busiest booths cleaned eye- 
glasses, thè better to see thè exhibits. 

Apple itself was there with a mam- 
moth display. Two companies operat- 
ed by young people, Mind Systems and 
Doublé Gold Software, were present. 
Graphic software packages from Ac- 
cent Software, Avant-Garde, Hayden 
Software, Island Graphics and Pen- 
guin Software caught thè browser’s 
eye. Syntauri and Passport Designs 
musically entertained, while Sawy, 
Zardax and PFS were constantly be- 
sieged with inquiries. Broderbund, 
Budgeco, Highlands, Piccadilly, Ren¬ 
aissance, Sierra On-Line, Sunnyside 
Soft. . . all captivated thè younger au¬ 
dience, with adventures playing across 
monitors, and a non-violent arcade 
game making its debut. Educational 
software was offered by a variety of 
companies, such as Cybernetics Logo, 
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CompuWise, Kids Can Touch and 
Don t Ask Software. 

A drive price war was apparent, 
with figures dropping into thè $200 
range for SVi-inch floppy disk drives. 
A flood of visitors to thè booths of com¬ 
panies like Corona and Santa Clara 
Systems verified thè popularity of thè 
hard-disk drives. 


RAM boards, 8086 boards, 80-col- 
umn boards. . . thè exhibition was 
awash with them. No matter where 
you turned, you could find a special 
board that would do something abso- 
lutely marvelous for your Apple. Then 
there was CommSoft’s Photocaster with 
thè Epson MX-80 that prints in color, 
Synetik s new video interface. . . thè 
list could stretch on for a good while. 

The continuing controversa over 
piracy was hotly discussed, especially 
since East Side Software with their 
Wildcard board had a booth. (Pm told 
over 1000 units were soldi) Don Fudge 
of Avant-Garde Creations spoke brief- 
ly about thè piracy problem. He stated 
that if a manufacturing company 
didnt cooperate with thè consumer by 
making an inexpensive back-up copy 
of a product available, then thè con¬ 
sumer had a right to create a copy of 
thè disk. 

“Guerrilla warfare” is how James 
Hunter pf Hayden Software phrased 
thè current state of affairs. Disk pro- 
tection becomes more sophisticated, 
then thè pirates upgrade their copying 
devices. . . and thè cycle continues on 
and on. He added that application 
softwareshouldn’tbeprotected. How- 
ever, with thè rate of return on game 
software so low to begin with, current 
protection methods must rem ain in 
force until a permanent method of 
protection is available. Hunter does 
not consider this a moral issue, but an 
economie one. He expressed great con- 


cern that all of these schemes ultimate- 
ly hurt thè consumer. 

Gii Beyda of Mind Games, at 19 
years old a company officer and 
creator of Desecration, feels thè 
average end-user does not, and can- 
not, copy most software. The quick 
buck made by those who sell copy 
cracking schemes hurts thè industry 
and Apple Computer. Beyda would 
like to see some form of cartridge 
System for all game software. Then, 
thè dollars now spent on protection 
could be applied tdother areas, such as 
development, graphics and docu- 
mentation. 

Doublé Gold Software’s 16-year-old 
president, Jeff Gold, believes that ev- 
ery computer owner has at least one pi- 
rated copy of software in his or her li¬ 
brary. He agrees with Mr. Hunter that 
application software should not be 
protected. He feels that within a short 
time a protection scheme will appear 
that cannot be broken by any current, 
or future, hardware or software 
device. 

Penguin Software’s Mark Pelczarski 
also foresees a cartridge System for 
game software within a couple of 
years, and feels that companies that 
protect application software (Penguin 
was one of thè first to drop protection 
in this category) are asking for piracy. 

Many of thè ’f^st’s visitors believe 
thè media have magnified thè piracy 
question. Some ventured that if thè 
software companies were to lower 
their prices (to an average of perhaps 
$19.95), and offer a reasonably priced 
backup copy ($3 to $5), people 
wouldn’t bother copying. Others 
stated that no matter how low thè 
price went, copying software is a chal- 
lenge to them. The greater thè hype a 
copy protection scheme receives, thè 
better they like to dig in their heels and 
try to bust thè code. These folks were, 
however, definitely in thè minority at 
this Applefest. 

All in all, this fair was fun and infor¬ 
mative. Participation seemed up, and 
thè strong presence of Apple Computer 
itself was superb support for all in at¬ 
tendale. The trials and tribulations 
involving management and accommo- 
dations were a reai problem. But, this 
aside, thè San Francisco Applefest gets 
good marks. ■ 


“The continuing controversy 
over piracy was hotly 
discussed...’’ 
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PhotoCaster...a new feature packed System to take, 
process, store, print, send and receive color and black- 
and-white photos with your Apple II computer. 

PC-100 (disk software, I/O board, manual, 

demo tape) .$499.95 

PC-101 (above plus Panasonic TV camera, 

RGB filteraccessory).$749.95 

Write or cali for details 

Visa and MasterCard orders accepted. Shipping charges and appli¬ 
catole California sales tax will be added. 

Apple II TM Apple Computer, Ine. W 

PhotoCaster TM COMMSOFT, Ine. W V/IWY1 UOV/l I 


(415) 493-2184 


COMMDSOFT 

2452 Embarcadero Way 
Palo Alto.CA 94303 


ISJ Electronic Specialists, Ine. 

171 South Main Street, Box 389, Natick, Mass. 01760 
(617) 655-1532 


YSTEMS CORP. 


“This is a quality document and is beautifully con- 
ceived and produced... .1 am in awe of your magnificent 
document.” 

H. IV. W., Dayton, Ohio 


Send Check or Money Order 


CARD 

ORDER NO. 

PRICE 

MODEL 1: BASIC & Assembler 

FC1002 

$4.95 

MODEL 1: BASIC Only 

FC1001 

2.95 

MODEL II: BASIC & Assembler 

FC1005 

5.95 

MODEL III: BASIC & Assembler 

FC1003 

5.95 

MODEL III: BASIC Only 

FC1004 

3.95 

COLOR: BASIC & Extended 

FC1006 

4.95 

POCKET: BASIC 

FC1009 

2.95 

APPLE II + Il PLUS: BASIC & 6502 

FC1008 

4.95 

APPLE II + Il PLUS: BASIC Only 

FC1007 

3.95 


SCV FC1013 $2.95 
MODEL II 

Commands & Utilities 
FC1010 $3.95 


Z80 

MICROPROCESSOR 
FC1011 $4.95 


ZX80, ZX81 and 
Timex Sinclair 
1000 

FC1012 $5.95 


Cali TOLL-FREE for Credit Card Orders 1-800-258-5473. Or, send your order with 
payment or complete credit card information to: 

WAYNE GREEN BOOKS • Retai! Sales • Peterborough, NH 03458 ; 

Enclose $1.00 per order for shipping and handling 


•TRS-80 Is a Reglstered Trademark of Tandy Corp. 

APPLE is a Registered Trademark of APPLE COMPUTER, INC. 
"Z80 is a Registered Trademark of Zilog. Ine. 


DISK DRIVE WOES? __ ^Apat. # 4,259705 

PRINTER INTERACTION? 

MEMORY LOSS? W\ 

ERRATIC OPERATION? W IS0 ., 

Don’t 

Blame The 
Software! 

Power Line Spikes, Surges & 

Hash could be thè culprit! Floppies, printers, 
memory & processor often interact! Òur patented ISOLATORS 
eliminate equipment interaction AND curb damaging Power Line 
Spikes, Surges and Hash. MONEY BACK GUARANTEE! 

• ISOLATOR (ISO-1) 3 filter isolated 3-prong sockets: integrai 

Surge/Spike Suppression; 1875 W Maximumm load, 1 KW load 
any Socket .$76.95 

• ISOLATOR (ISO-2) 2 filter isolated 3-rpong Socket banks; (6 

sockets total); integrai Spike/Surge Suppression; 1875 W Max 
load, 1 KW either Bank .$76.95 

• SUPER ISOLATOR (ISO-3) similar to ISO-1 except doublé 

isolation & Suppression .$115.95 

• SUPER ISOLATOR (ISO-11) similar to ISO-2 except doublé 

isolation & Suppression .$115.95 

• MAGNUM ISOLATOR (ISO-17) 4 Quad isolated sockets; For 

ULTRA-SENSITIVE Systems $200.95 

• CIRCUIT BREAKER, any model (Add-CB) Add $10.00 

• REMOTE SWITCH, any model (Add-RS) Add $18.00 


AT YOUR 
DEALERS 


MasterCard, Visa, American Express 
ORDER TOLL FREE 1-800-225-4876 
(except AK, HI, PR & Canada) 
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Graphic Goodies 



Stencils in Strìng 
Session 1 


ìnCider would like to make a habit of listing 
graphics programs that are more than ordinary in 
their presentatìon. Such is this month’s 
offering... a delightful view of delicate simplicity. 



T his program, adapted from a 
demonstration program I wit- 
nessed on a Tektronix graphics com¬ 
puter, demonstrates thè speed and 
ease of Apple graphics. 

The program starts by clearing 
thè screen. The color is set to white, 
and thè number of corners in thè fig¬ 
ure to be drawn is selected. Two 
random figures, with thè same num¬ 
ber of corners, are stored in arrays. 
The distance between each corre- 
sponding corner is divided by 15, 
and then 15 progressions of thè fig¬ 
ure are drawn. This program bears a 
strong resemblance to string art, and 
will run forever until you press 
either control-C or reset. È 


Address correspondence to Lee E . Sumner, 75 
E. King StDallastown , PA 17313. 


REM GRAPHICS DEMO 
DIM X ( 8 ), Y ( 8 ),X1(8),Yl<8) 

HOME 

HCOLOR* 3 

HGR : POKE - 16302,0 
REM THE FIGURE HA5 3 TO 7 SIDES 
N = INT ( RND (1) * 5) «■ 3 
REM SET UP THE CORWER5 
FOR I = 1 TO N 
X(I) - INT < RND (1) * 279) 

Y(I) - INT ( RND (1) $ 191) 

Xl(l) • INT ( RND (1) * 279) 

Y1 < I ) = INT ( RND (1) * 191) 

NEXT 

REM MAKE LAST CORNER SAME A5 FIRST 
X(N ♦ 1) * X< 1 ) 

Y(N + 1) « Y(1) 

XI(N + 1) = XI(1) 

Y1(N + 1) * Yl(l) 

FOR I = 1 TO N + 1 
REM 15 FIGURES 
XI(I) = XI(I) - X(I ) 

X1 ( I ) = X1(I ) / 15 

Yl(I) - ¥1(11 - Y(I) 

Y1(I) = Y1( I ) / 15 
NEXT 

REM DRAV THE FIGURES 
FOR J * 1 TO li 
REM GO TO INITIAL POINT 
HPLOT X(1),Y(l) 

REM DRAV REST OF FIGURE 
FOR I * 1 TO N + 1 
HPLOT TO X(I),Y(I) 

NEXT 

REM SET UP FOR NEXT FIGURE 
FOR K - 1 TO N + 1 
X(K) a X(K) + X1(K) 

Y(K) * YCK) + YKK) 

NEXT 

NEXT 

REM PAUSE TO ADMIRE VORK 
FOR Z = 0 TO 3400: NEXT 
REM DO IT AGAIN 
GOTO 50 


Program listing. 
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AUTHORS WANTED 


APPLE PASCAL/BASIC/ASSEMBLER 


Can you write thè next Wizardry? We are looking 
for top notch programmers to design and imple- 
ment state-of-the-art entertainment and business 
software. Here is what we can offer you! 

• BEST ROYALTIES in thè business. 

• Professional support designing, implement- 
ing, debugging and refining your software. 

• Hardware and software development tools 
at cost or free. 

• All production, packaging, distribution and 
advertising are done for you leaving time 
to start new projects. 

• State-of-the-art copy protection isprovided. 

Interested? To find out more, cali or write: 

Robert Sirotek 


r 6 MAIN STREET 

f OGDENSBURG, NEW YORK 13669 
315-393-6633 





Selling incider 
will make money 
for you. Consider thè 


Fact #1: Selling incider in- 
creases store traffic—our dealers 
teli us that incider is thè hottest-selling 
computer magazine on thè newsstands. 
Fact #2: There is a direct correlation between 
store traffic and sales—increase thè number of peo- 
ple coming through your door and you’ll increase 
sales 

Fact #3: Fact #1 + Fact #2 = INCREASED $ALE$, 
which means more money for you. And that’s a fact. 

For information on selling incider, cali 800-343-0728 
and speak with Ginnie Boudrieau, our bulk sales man¬ 
ager. Or write to her at incider, 80 Pine Street, Peter- 
borough, NH 03458. 




ider. 

Green's Apple* Magazine 


80 Pine Street 
Peterborough, NH 03458 

800-343-0728 




Daisy wheel quality 
without daisy wheel 
expense. 

You need thc quality print that a daisy wheel 
printer provides but thè thought of buying one makes your 
wallet wilt, The Selectric ™ Interface , a step-by-step guide to 
interfacing an IBM Selectric I/O Writer to your microeom- 
puter, will give you that quality at a fraction of thè price. 
George Young, co-author of Microcomputing magazine’s 
popular “Kilobaud Klassroom” series, offers a low-cost al¬ 
ternative to buying a daisy wheel printer. 

The Selectric ™ Interface includes: 

• step-by-step instructions 

•tips on purchasing a used Selectric™ 

•information on various Selectric™ models, in- 
cluding thè 2740, 2980, and Dura 1041 
•driver software for Z80, 8080, and 6502 chips 

• tips on interfacing techniques 

With The Selectric Interface and some background in elee- 
tronics, you can have a high-quality, low-cost, letter-quali- 
ty printer. Petals not included. 

Credit card orders cali TOLL-FREE 1-800-258-5473. Or 
mail your order with payment plus $1.50 shipping and 
handling to: Wayne Green Ine. Attn: Retail Book Sales, 
Peterborough, NH 03458. 

Dealer inquiries invited. > 

ISBN 0-88006-051-4 128 pages q> 1 2 ♦ 9 7 

□ Yes, 1 want Selectric Interface (BK7388). Enclosed is $12.97 per 
copy plus $1.50 for shipping and handling. 

□ MASTER DVISA □ AMEX 

Card #_ Expires__ 

Signature ________ 


State and Zip_ 

All orders shipped UPS if complete Street address is Riverì. 
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Downgrade Your Apple 


by David T. Shaffer 

uto-start or Monitor ROM? 
That was thè question I faced 
two years ago when I bought my Ap¬ 
ple II Plus. And what a question! I 
had done some programming in col¬ 
lege, but I didn’t know much about 
microcomputers. As I looked at thè 
two machines, it seemed that thè 
Auto-start ROM made thè whole 
process easier: Just turn thè machine 
on and everything is ready to go. 
When thè resident language (Integer 
or Applesoft) Comes up, thè appro¬ 
priate prompt character is dis- 
played. If a disk controller card is 
plugged in, it automatically boots 
and DOS is loaded. 

With thè Monitor ROM, when 
you turn thè machine on, you have 
to press control-B to bring up thè res¬ 
ident language. Booting DOS re- 
quires PR#6 or, from thè monitor, 
6-control-P. 

And if you hit reset—thè Monitor 
ROM dumps you back into thè mon¬ 
itor and you have to start all over 
again. The Auto-start ROM neatly 
brings you back to life in thè resident 
language, or wherever thè reset vec- 
tor at $3F0 is set. 

Why would anyone want thè 
Monitor ROM? On thè surface, 
Auto-start is easier, but thè Monitor 
ROM had a few features that were 
lost when thè Auto-start feature was 
added—a Mini-assembler and Step 
and Trace for machine-language 
programs, to name a few. But if you 
bought an Auto-start ROM machine, 
you couldnt take advantage of thè 
features. 

At least until now. Now thè story 
becomes interesting. MPC (San 
Diego, CA) carne out with a 32K 
RAM board—in and of itself, not all 
that exciting. The advertisement de- 
scribed thè ability to add your own 
monitor to thè RAM board. This 
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sounded like just thè way to add thè 
Monitor ROM to my System. 

My locai Computerland did not 
handle thè MPC board, so I called a 
California distributor and a week 
later I had my board. It’s nicely built 
and plugs in with no problems. Like 
typical RAM cards, it must be insert- 
ed into slot 0 and strapped into thè 
motherboard. Now all I had to do 
was get thè Monitor ROM chip from 
Computerland. I led a long search 
through thè dusty drawers of thè Ser¬ 
vice shop. Who ever heard of some- 
one wanting to downgrade their 
machine to thè old Monitor ROM? 
Finally they found one and were 
happy to sell it ($13.50 list). 

After rushing home I plugged it 
into thè empty socket on thè RAM 
board and powered up. The screen 
promptly filled up with garbage! 
Something had to be wrong. No 
amount of plugging, switching or 
typing at thè keyboard would 
make anything happen. It just did 
not work. 

Now it’s time to seriously look at 
what’s on thè RAM card and how it 
interacts with thè INTBASIC or 
FPBASIC from thè System Master. 
When thè System Master is booted, 
it first loads a RAM Card Finder at 
$301 (CALL 769) and when it is run, 
it sets $300 (PEEK 768) depending 
on whether or not it finds a card. If 
it does, it opens thè card for a RAM 
Write by addressing $C081 twice 
and it then Bloads INTBASIC or 
FPBASIC at $D000. 

Taking a brief look at INTBASIC, 
we find that it is a binary program 
that is $3000 in length. Since it starts 
at $D000, it extends clear up to 
$FFFF, or thè top of memory. But 
wait a minute, thè monitor resides at 
$F800 to $FFFF. So both INT- 
BASIC and FPBASIC contain a copy 



of thè monitor. I had a chip that had 
thè Monitor ROM routine on it. By 
plugging thè Monitor ROM (power 
OFF!) into F8 on thè motherboard 
and booting DOS, I had thè Monitor 
ROM in thè machine. I saved thè 
Monitor routine as a binary file, 
“BSAVE MONITOR ROM, A$F800, 
L$800”. 

From this point on, I’il deal only 
with INTBASIC. The same applies 
to FPBASIC but I’m tired of typing 
them both. 

The next step was to return thè 
originai ROM to thè motherboard 
(power off). Turn on thè power and 
boot DOS. A new disk needs to be 
initialized at this point with thè 
Hello program from thè System 
Master. Temporarily Bload INTBA- 
SIC,A$800 and then overlay thè 
Monitor ROM at $3000 by “BLOAD 
MONITOR ROM,A$3000”. Now 
Bsave thè new INTBASIC by 
“BSAVE INTBASIC,A$800,L$3000” 
on thè new disk. This is so thè origi¬ 
nai INTBASIC on thè System Master 
is left intact. 

The INTBASIC on thè new disk 
now has thè Monitor ROM built into 
it. Boot your new disk and INT- 
BASIC will automatically be loaded 
into thè RAM card. Type INT and 
hit return; thè Integer prompt > will 
appear. Hit reset and you will be 
dumped into thè monitor. Type 
$F666 and thè Mini-assembler 
prompt ! appears. The Step and 
Trace functions work as expected. 
Control-B puts you back in Integer. 
One problem—type FP and you get 
a ***SYNTAX ERR. Hit reset and 
you’re back in thè monitor. You’re 
trapped! Applesoft is nowhere to be 
found. 


Address correspondence to David T. Shaffer , 
4124 Ridgeview Road , Harrisburg, PA 17112. 






BEAGLE 


Utility City . 29.50 

Alpha Plot.39.50 

Apple Mechanic. 29.50 

BRODERBUND 

Apple Panie. 29.95 

David’s Midnight Magic .34.95 


List 

Our 

Price 

Price 

24.00 

20.40 

29.50 

25.05 

39.50 

33.55 

29.50 

25.05 

29.95 

25.45 

34.95 

29.70 

59.95 

44.95 

31.95 

27.15 

34.95 

26.20 

34.95 

29.70 

34.95 

29.70 

29.95 

25.45 


Deadly Secrets . 34.95 29.70 

Serpentine. 34.95 29.70 

Sea Fox. 29.95 25.45 

HOME ACCOUNTANT 
_ 7^95 56.20 _ 

CONTINENTAL 

★ CPA Modula* #1-4 (eaph). 250.00 187.50 

First Class Mail . 74.95 63.70 

DATA MOST 

Snack Attack. 29.95 25.45 

Swashbuckler. 34.95 29.70 

★ Cesino . 39.95 29.95 

Pig Pen. 29.95 25.45 

Crazy Mazey. NEW.. 29.95 25.45 

Mars Cars. NEW .. 29.95 25.45 

Tubeway . NEW.. 34.95 29.70 

EDU-WARE 

Rendezvous . 39.95 33.95 

★ Prleoner 2 . 32.95 24.70 

Algebra series (each). 39.95 33.95 

Fractions/Decimals{each) . 49.00 41.65 

PSAT/SAT Word Skills (each). 49.00 41.65 

HOWARD 

★ Tax Preparer (1983) . NEW 225.00 168.75 

Creative Financing. 196.00 165.75 

Reai Estate Analyzer li. 195.00 165.75 

INFOCOM 

Zork I, II, III (each). 39.95 33.95 

★ Deadllne ... 49.95 37.45 

Starcross. NEW.. 39.95 33.95 

MICROSOFT 

Typing Tutor II . 24.95 21.20 

TASCCompiler . 175.00 148.75 

RAM Card. NEW .. 99.95 84.95 

★ Multiplan . NEW 275.00 206.25 

MUSE 

Super Text 40/56/70 . 125.00 106.25 

Castle Wolfenstein. 29.95 25.45 

Know Your Apple. NEW.. 34.95 29.70 


CALSOFT 

346 N. Kanan Rd. #103 
Agoura, CA 91301 


PENGUIN Prie. prie. 

Complete Graphics System . 69.95 59.45 

Graphics Magician. 59.95 50.95 

Special Effects. 39.95 33.95 

Spy's Demise. NEW.. 29.95 25.45 

Transylvania. NEW. 34.95 29.70 

SENSIBLE 

Super Disk Copy III . 30.00 25.50 

Multi-Disk Catalog . 25.00 21.25 

★ Sensible Spellar. 125.00 93.75 

SIERRA ON-LINE 

HI-RES Adventures 0-4 . 15% OFF 

★ Time Zone. 99.95 74.95 

Dark Crystal. NEW.. 39.95 33.95 

★ LISA. 79.95 59.95 

LISA Educational System. 119.95 101.95 

★ General Manager. 229.95 172.45 

Threshold. 39.95 33.95 

★ Screen Wrlter. 129.95 97.45 

★ Screen Wrlter Professional . 199.95 149.95 

Cross Fire . 29.95 25.45 

Mouskattack. 34.95 29.70 

Ultimali . 59.95 50.95 

Frogger . 34.95 29.70 

Cannonball Blitz . 34.95 29.70 

TheArtist . 79.95 67.95 

Laf-Pak. 34.95 29.70 

Pest Patrol. 29.95 25.45 

Lunar Leepers. 29.95 25.45 


SI RI US SOFTWARE 



List 

Our 

Price 

Price 

39.95 

33.95 

29.95 

25.45 

49.95 

42.45 

34.95 

29.70 

34.95 

26.20 

29.95 

25.45 

29.95 

22.45 

29.95 

25.45 

39.95 

33.95 

39.95 

29.95 

39.95 

33.95 


SIR-TECH 

Wizardry. 49.95 42.45 

Knight of Diamonds. 34.95 29.70 

Star Maze. 34.95 29.70 

SOFTWARE PUBLISHING 

★ PFS. 125.00 93.75 

PFS: Report. 95.00 80.75 

★ PFS: Graph ...'. 125.00 93.75 

STONEWARE 

DB Master. 229.00 194.65 

★ DB Master Utility Pak #1 . 99.00 74.25 

★ DB Master Utility Pak #2. 99.00 74.25 

SYSTEMS PLUS 

★ General Ledger. 395.00 296.25 

★ Accounts Payable. 395.00 296.25 

★ Accounts Receivable. 395.00 296.25 

TG PRODUCTS 

★ Joystick. 59.95 44.95 

Game Paddles. 39.95 33.95 

★ Select-a-Port. 59.95 44.95 


WORD HANDLER 

_ 19>f$5 149.95 _ 

STRATEGIC SIMULATIONS 

Cartels & Cutthroats . 39.95 33.95 

Southern Command. 59.95 50.95 

★ Napoleoni Campaigns. 59.95 44.95 

Battleof Shiloh . 39.95 33.95 

Tigers in thè Snow . 39.95 33.95 

Road to Gettysburg. 59.95 50.95 

Pursuit of thè Graf Spee. 59.95 50.95 

Guadalcanal Campaign . 59.95 50.95 

Cytron Masters . 39.95 33.95 

Galactic Giadiators. 39.95 33.95 

★ TheCosmic Balance . 39.95 33.95 

SEUIS . 39.95 33.95 

★ Germany: 1985 . NEW . 59.05 44.95 

Battio of Normandy. NEW .. 39.95 33.95 

VISICORP 

★ Visicalc. 250.00 193.75 

Vi8itrend/Visiplot . 300.00 255.00 

Visidex . 250.00 212.50 

Visitile. 250.00 212.50 

We also carry complete lines from thè 
following companies: 

ADVENTURE INTERNATIONAL 
ARTSCI • ASHTON-TATE 
AUTOMATED • AVANT-GARDE 
BEAGLE • CAVALI E R 
DATASOFT • DON’TASK 
GEBELLI • HAYDEN 
INSOFT • KENSINGTON 
LEARN1NG CO. • MICROLAB 
MICROPRO • PEACHTREE 
PHOENIX • PICCADILLY 
QUALITY • SENTIENT 
SORCIM • SOUTH WESTERN 
SPINNAKER • SUBLOGIC 

SYNERGISTIC • VIDEX 

If you don’t see it, Ask Us! 


Cali Toll Free: (800) 423-5290 In California: (213) 991-9641 

We accept MasterCard & Visa (include# and Expiration Date), check, COD ($1.50 extra), or Money 
Order. California residents add 6% sales fax. Include $2.00 forshipping (UPS Blue Label $3.00, 
Canada $6.00, other foreign countries $10.00). 

★ Sale prices are through February only! Prices subject to change without notice. 


Circle 152 on Reader Service card. 
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Hints ’n’ Techniques 


“Wait a minute! 


It doesn’t work 
that way. ’ ’ 


All is not lost. The problem, if you 
want to cali it that, is all in how thè 
two monitors handle reset. For an 
excellent description, refer to pages 
36-38 of thè Apple II Reference 
Marinai. To get back to Applesoft, 
hit reset, which brings you back to 
thè monitor. Type $C082, press re¬ 
turn, and thè RAM card is deactivat- 
ed and write-protected. The ROM 
on thè motherboard is now active. 


Control-B will now bring you back 
to thè resident language. 

If you’ve been following to this 
point, and have actually built a new 
INTBASIC with thè Monitor ROM 
in it, you may be saying, 44 Wait a 
minute! It doesn’t work that way. I 
can toggle back and forth between 
Integer and Applesoft normally.” 
That’s true, until you hit reset. Once 
you hit reset, you’re trapped in thè 
Monitor ROM until you take thè 
necessary steps to extricate yourself. 
Rather than field a lot of calls and 
letters, FU explain how to do it. 

If you re in thè monitor, and you 
got there by hitting reset from thè 
language loaded onto thè RAM 
card, with thè Monitor ROM over- 


laid on it, you will have to deacti- 
vate thè RAM card as described 
above to get back to motherboard 
language. Otherwise, control-B will 
bring you back to thè language you 
just carne from. 

The procedure is simple: 

1. Copy thè Monitor ROM to disk. 

2. Load INTBASIC or FPBASIC 
at $800. 

3. Overlay Monitor ROM at 
$3000. 

4. Save thè new INTBASIC or 
FPBASIC on a new disk with thè 
System Master Hello program on it. 

5. Run Hello on thè new disk. 

Downgrade your Apple? Now 

it’s easy, and available when you 
want it. ■ 


Apple Editing Made Easy 


by Dan Bishop 

W hat’s that you say? You own 
an Apple but are not a touch 
typist? You leave a trail of typos all 
over thè place? 

You can turn to your program- 
ming reference manual and try thè 
edit procedures listed there, but more 
often than not, your edited line will 
contain more errors than thè origin¬ 
ai. Furthermore, it is aggravating to 
have to press two keys (thè escape key 
and either A, B, C, or D) to initiate a 
single cursor move. And what’s worse, 
there is no logicai relationship be¬ 
tween thè letter (A-D) or its position 
on thè keyboard and thè direction that 
key moves thè cursor. 

When I began serious program- 
ming on an Apple, I was dismayed to 
find it was, in most cases, easier to re- 
type thè offending line than to press 
this key, then that key, then another 
key and on and on to position thè cur¬ 
sor and make a necessary correction. 
Until I learned some secrets for edit- 

Address correspondence to Dan Bishop, Cus- 
tom Comp, PO Box 429, Buena Vista, CO 
81211. 


ing with thè Apple, that is. 

Simple Editing Tasks 

Very short lines provide thè sim- 
plest editing situations. Just retype 
thè line, making corrections as you go 
along. Don’t try to edit thè line if you 
can type it in faster. 

On longer more complicated lines, 
thè edit procedure is stili relatively 
easy if thè line does not contain liter- 
als or string information. Look for a 
moment at thè escape key on your 
keyboard. Think of it as an on/off 
switch to enable thè J, I, K and M 
keys for cursor control. Press thè 
escape key to initiate thè cursor con¬ 
trol mode. To résumé normal key¬ 
board entry press it again. 

Before doing any actual editing, 
play around with J, I, K and M, using 
thè escape key as a cursor control 
switch. Press escape. Now press thè 
four letter keys at random and watch 
thè cursor move. You may want to 
press one of thè letter keys a single 
time, and then press thè repeat key to 
move thè cursor even further. 


You will notice two differences in 
how J, I, K and M work in contrast to 
A, D, B and C. In thè latter case, thè 
escape key had to be pressed once 
each time thè cursor was moved one 
space. Now you press thè escape key 
only once, period. 

The other useful feature of thè J, I, 
K and M keys is that their respective 
locations on thè keyboard are analo- 
gous to thè directions thè cursor will 
move. The I key moves thè cursor 
UP, J to thè LEFT, K to thè RIGHT 
and M moves it DOWN. 

Sample Procedures 

Try editing a simple Basic line. For 
example, suppose that thè follow¬ 
ing line has been entered into thè 
program: 

100 IMPUT X(I):PRINNT X(I)*100 

Although it is not necessary, do a 
LIST 100 to display thè line on thè 
screen just above thè cursor. Now 
press Escape to go to thè cursor move- 
ment mode. Press I to move thè cur¬ 
sor up to thè line to be changed, and 
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press J to move thè cursor left until it 
just rests on thè 1 of thè line number. 
Then press escape again to return to 
norma! keyboard mode. 

Next use thè right arrow to move 
thè cursor to thè right, copying into 
memory each character it passes. Use 
thè repeat key if you have a long line 
of characters. Stop when thè cursor is 
over thè letter to be changed (thè M 
in IMPUT), press thè correct letter 
(N), then continue moving thè cursor 
to thè right until it rests on thè next 
character to be corrected. Be sure, 
after making all corrections, to move 
thè cursor to thè end of thè line of in- 
structions (including wrap-arounds) 
before pressing return. 

In thè above example, thè second 
error requires a deletion, not an over- 
strike. After you have copied over to 
thè N that you want to remove from 
PRINNT, move thè cursor to thè 
right (in this casejust one character) 
without copying. Probably you have 
guessed this can be done with thè 
escape switch to tum on thè cursor 
movement mode, pressing thè K one 
time only, and then pressing thè 
escape switch again to résumé nor- 
mal operations. Now you copy thè 
rest of thè Basic line into thè comput¬ 
erà memory. 

Inserting information into thè line 
is not too difficult either. Suppose 
you wish to insert thè instruction 
PRINT X(I) between thè Input state¬ 
ment and thè already existing Print 
statement. LIST 100, press escape, 
move thè cursor over die 1 in thè line 
number and press escape again to 
tum off thè cursor movement mode. 
Then use thè right arrow to move thè 
cursor to thè P of thè Print statement, 
where you wish to insert your new 
material. The next step will look 
strange on thè screen, but thè input 
will be fine in memory. Move thè 
cursor to a blank part of thè screen, 
type in thè material to be inserted, 
then return thè cursor to thè initial P 
and finish copying thè line as before. 

The cursor should now be over thè 
P in thè word PRINT. Press escape, 
use J, I, K and M to move thè cursor 
to any blank part of thè screen, then 
press escape again to tum off thè cur¬ 
sor movement mode. Type in thè 


PRINT X(I): to be inserted, press es¬ 
cape and move thè cursor back to thè 
originai P. Press escape for normal 
keyboard mode, copy to thè end of 
thè Basic line and press return. 

Although it takes a while to de* 
scribe this procedure, with a little use 
you will find that program lines of 
moderate length can be edited more 
readily than retyped. 

Also, using thè overstrike tech- 
nique it is possible to copy a Basic line 
of instructions into several different 
places in your program by simply 
overstriking thè line numbers. When 
retura is pressed, thè old line remains 
in thè program unaltered, while a 
new line (using your new line num¬ 
ber) will appear with thè identical in¬ 
struction set. Of course, there is no 
reason why a line similar to one ai- 
ready existing in your program can- 
not be copied and edited into a new 
program line at thè same time—a 
useful technique for copying complex 
lines within a program. 

Complex Editing Tasks 

Unfortunately, because of thè 
screen editor that displays thè pro¬ 
gram listine, not every job can be 
handled so simply. You may have 
noticed that lines longer than 40 
characters are listed with blank 
spaces corresponding to left and right 
margins on thè screen. This plays 
havoc with thè editing procedures. 

If these added spaces occur within 
quotation marks, do not copy them 
into memory. To avoid doing so, first 
copy to thè end of a displayed line, 
being sure to pass over thè last 
character you want to keep. The cur¬ 
sor will now be in thè first blank 
space of thè right display margin. To 
move thè cursor from this position 
down to thè next line and over to thè 
first character on thè next line to be 
copied, press escape, then K and re¬ 
peat until thè cursor is properly posi- 
tioned to continue copying. Then 
press escape again to return to nor¬ 
mal keyboard entry mode, and conti¬ 
nue copying this line. You must al- 
ways follow this procedure at a mar¬ 
gin. Finally, when thè entire Basic 
line has been copied into memory, 
press return. 


The following example can be used 
to practice this technique. 

100 PRINTTHE QUICK BROWN FOX 
JUMPED OVER THE LAZY DOG THAT 
WAS RESTING IN THE MID-OCTOBER 
SUN DREAMINO OF SNOW AND SKIING.” 

This line will be listed over several 
video lines—a reai challenge to edit¬ 
ing until you understand what is hap¬ 
pening. Try to change thè word 
“Resting” to “Sleeping,” and to delete 
“Mid-October.” The only way to ver- 
ify thè changes is by making sure this 
line is thè only one in thè program 
memory and then running thè pro¬ 
gram to check thè results. 

Margin spaces not enclosed in quo¬ 
tation marks present no problem. 
The computer will ignore them any- 
way when thè Basic line is stored. 
You can merely copy over them as if 
they didn’t exist. Data lines, howev- 
er, present much thè same problem 
as quoted material, and must be ' 
treated in exactly thè same way, 
quotation marks or not. 

The most difficult problem is if a 
string of blank spaces is part of thè 
literal information we want to copy, 
but thè spaces come right at thè end 
of thè line and are indistinguishable 
from thè margin spaces. The only 
thing to do here is to start 
counting! ■ 
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by Dan Bishop 


Apple Variables II 


The previous article in this series, The Applesoft 
Adviser, introduced thè concept of variables and 
demonstrated how variables are used in Basic pro- 
grams. Two advanced examples were presented in 
that article. The first provided a subroutine that 
allows a columnar display of decimai numbers to 
be presented with thè decimai points lined up in 
tabular fashion. The second presented a subrou¬ 
tine that can be used for single keyboard entry 
response to displayed prompts and menu displays. 

This article will explore thè use of array vari¬ 
ables. As before, thè first portion will deal with 
thè basic concepts and will include examples to il¬ 
lustrate these concepts. The second portion will 
outline a data entry routine that makes extensive 
use of array variables. Although this more ad¬ 
vanced example will be explained thoroughly, thè 
less experienced reader may wish to postpone a 
thorough study of it until he or she has had more 
background in Basic programming. 


I n The Applesoft Adviser last 
month, I suggested that a variable 
is similar to thè tag we place on peo- 
ple or things that we cali by name. 
When we need thè quantity that a 
particular variable represents, all we 
do within thè program is refer to thè 
variable by calling its name. Thus 
PC %, for example, could be thè vari¬ 
able name that represents thè payroll 
count in a payroll program. 

Frequently you need to refer to a 
number of related items within a pro¬ 
gram, processing each item in exactly 


thè same way. Of course, each item 
could be given a totally different 
variable name. Thus you could have 
variables named AA, BB, CC, AC, 
RM, etc. 

The problem with this approach is 
that thè lines of Basic code that pro- 
cess this data would have to be re- 
peated for each uniquely named vari¬ 
able. For example, suppose that at 
thè end of a given routine you 
wanted to add 1 to four different 
variables. If these variables were 
named PI %, P2%, P3% and P4%, 


thè following Basic lines in thè pro¬ 
gram would carry out this function: 

1000 Pl% = Pl% + 1 
1010 P2% = P2% + 1 
1020 P3% = P3% + 1 
1030 P4% = P4% + 1 

The number of repeated lines 
would increase dramatically as thè 
number of treated variables in- 
creased. Also, more complicated pro¬ 
cessing, in which each variable 
would have to be dealt with by using 
more than just a single instruc- 
tion line, would result in a longer 
program. 

Arrays 

Such repetition would be unneces- 
sary if you could handle all these 
variables as a family, and specify 
each in à unique way that would not 
require each to have its own unique 
set of processing instructions. This is 
where array variables come in. 

An array is a family of related vari¬ 
ables, all having thesame “last name.” 
For example, to telephone any mem- 
ber of thè Jones family, you would use 
thè same procedure: look up “Jones” 
in thè telephone book, select thè ap¬ 
propriate name, lift thè telephone 
receiver from thè hook and diai thè 
number shown in thè book. 

Each member of thè Jones family is 
unique, and each has a different first 
name, but thè procedure for calling 
any of them is thè same. Similarly, all 
of thè variables in an array have thè 
same “last name,” but each has a 
unique “first name.” The first name in 
this case is (and must be) a numeric 
subscript. 

Since subscripts are hard to repre- 
sent on a computer display, they are 
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conventionally shown after thè vari- 
able name as numbers enclosed in 
parentheses. Thus A(l), A(2), A(3) 
and A(4) are four unique variables be- 
longing to thè A array. But sinee thè 
first names (subscripts) are numeric, 
we can get thè computer to change thè 
numbers whenever we like, and thus 
cali out whichever member of thè ar¬ 
ray family we wish to work with at 
any given time. 

To see how this can be done, letfs 
redo thè example above, in which 
four variables were incremented by 

1. This time, select thè variable 
names P%(1), P%(2), P%(3) and 
P%(4). The parentheses completely 
change thè way thè computer treats 
these variables. Before, they were 
four totally unrdated items. Now, 
they represent four members of an 
array family. To increment each of 
thè four use thè following code: 

1000 M% = 1 

1010P%(M%) = P%(M%) + 1 

1020 M% = M% + 1 

1030IF M % < 5 THEN GOTO 1010 

This simplified example stili re- 
quires four lines, but thè same four 
lines could increment 25 variables as 
well as four, after changing thè 5 in 
line 1030 to 26. Similarly, only one 
line, line 1010, actually increments 
thè variables, while thè first exam¬ 
ple needed four lines. The set of pro¬ 
cessing instructions needs to appear 
only once. 

Also note that in thè processing 
routine, thè subscript is not a specific 
number, but rather an integer vari¬ 
able (M%) that takes on thè appro¬ 
priate values needed to refer to a 
unique variable. Thus thè first time 
through this set of instructions, M% 
has thè value of 1 and P% (1) is thè 
variable being referenced. When line 
1030 is reached, M % has thè value of 

2, so thè program loops back to line 
1010 and P% (2) is dealt with. 

In thè same way, we take care of 
P%(3) and P%(4). After P%(4) has 
been incremented, M% takes on thè 
value of 5 and line 1030 allows thè 
computer to proceed on past line 
1030 and escape thè loop. 

The above example could have 
been simplified further using thè 
For... Next loop structure as foflows: 


1000 FORM = Ito 4 
1010 P%(M) = P%(M) + 1 
1020 NEXT M 

In this case we had to use a reai 
variable name (M) for our loop 
counter—a limitation required by 
Applesoft Basic. But this is a subject 
for a later article. 

Array Variable Names 

The specific restrictions on naming 
array variables are identical to those 
limitations that apply to any vari¬ 
able. As I mentioned in Apple Vari¬ 
ables I, certain reserved words used 
by Basic cannot be used for variable 
names or as part of a variable name. 
You’ll be less likely to break this rule 
if variable names are just one or two 
characters (with thè first character 
always alphabeticl), since only a few 
Basic reserved words have only two 
characters (IF, OR, FN, ON, AT, 
GR and TO). 

Furthermore, although a variable 
name may be longer and more de- 
scriptive of thè item it represents, Ap¬ 
plesoft Basic only recognizes thè first 
two characters as thè variable name. 
Thus CHECK and CHOW would be 
interpreted by Basic as thè same 
variable. 

Array variables may be assigned to 
specific types, just as other variables. 
A percent sign (%) may be included 
after thè variable name (but before 
thè subscript) to specify that thè 
elements within thè array are to be 
treated as integers rather than reai 
numbers (those with floating decimai 
points). A dollar sign ($) must appear 
between thè variable name and thè 
subscript for any array whose ele¬ 
ments are strings. Thus A(12), 
RT(235) and ZA(4) all represent ar¬ 
ray elements that are reai numbers, 
A%(12), RT%(235) and ZA%(4) 
represent array elements that are in¬ 
tegers, and A$(12), RT$(235) and 
ZA$(4) represent array elements that 
are strings. 

An interesting point is that all nine 
of thè arrays presented in thè pre- 
vious paragraph could co-exist within 
thè same program without conflict, 
since thè computer keeps track of 
variable types as well as variable 
names. Whafs more, you could even 


have non-array variables named A, 
A%, A$, RT, RT%, RT$, ZA, ZA%, 
ZA$ within thè same program that 
contains our nine arrays; thè com¬ 
puter would treat all 18 variables as 
uniquely different items. This pro- 
vides considerable flexibility in our 
choice of variable names. 

The subscripts used with an array 
variable dont have to be integers, al¬ 
though thè computer will interpret 
any subscript as an integer by trun- 
cating (cutting short) any numerals 
to thè right of a decimai point. 

As demonstrated in thè above ex¬ 
ample, subscripts may themselves be 
variables. It is sometimes useful to use 
an array variable for a subscript. 
AA(P%(I)) is an example of this, 
where P% (I) is thè subscript for AA. 

Sometimes a mathematical expres- 
sion may be needed to determine thè 
value of a subscript. Then it is per- 
missible to include thè entire expres- 
sion as thè subscript. The computer 
will first evaluate thè expression in 
order to determine thè value for thè 
subscript, and then continue. Thus 
RF$(I + 2*J +1) is a valid array 
variable. 

Computers get upset, however, if 
an array subscript is a string or is rep- 
resented by a string variable. Nega¬ 
tive subscripts cause an error mes- 
sage, although a subscript of 0 is 
acceptable. A BAD SUBSCRIPT 
prompt will be displayed if a sub¬ 
script value exceeds thè array specifi- 
cation made with thè dimension 
statement (see below). 

As you might expect, thè same lim¬ 
itations on thè actual values a vari¬ 
able represents also apply to array 
variables. An integer array variable 
may range in value from - 32767 to 
+ 32767; a string array variable may 
range in size from a nuli string (“ ”) 
to a string with 255 characters in it; 
and a reai numeric array variable 
may range in size from about 1 x 10 
to thè - 38th power to about 1 x 10 
to thè + 38th power, with numbers 
larger than 999 billion and smaller 
than 0.01 represented in exponential 
notation (such as 8.9322 E + 22). 

Multidimensional Arrays 

The simplest type of array is a sin- 
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V(8,l) 




V(8,5) 


Figure 2 . A two-dimensional array , V, having 48 demente. Only 40 elements areshotvn in 
this example , sirice ffce zero elements f or each dimension are not being used. The choice of 
presenting thè roto subscripts first tvas arbitrary. 


L%(5) 


L%(6) 


L%(7) 


L%(8) 


L%(9) 


L%(10) 


Figure 1. A linear array , L.%, having 11 
clemente. 


gle dimensionai array, sometimes re- 
ferred to as a linear array. Each ele- 
ment in such an array is represented 
by a variable name followed by a 
subscript composed of a single num- 
ber. (See Figure 1.) 

You can imagine all of thè ele¬ 
ments in such an array lined up one 
after thè other in a linear sequence, 
with element 1 first, element 2 sec- 
ond, and so on. In fact, that is pretty 
much how thè values for linear arrays 
are actually stored in memory. 

Frequently it is advantageous to 
use array variables that have more 
than one dimension. A two dimen¬ 
sionai array might well represent a 
table of values containing eight rows 
and fìve columns. (See Figure 2.) 

Each element within this array is 
distinguished from other elements by 
a combination of two subscripts in- 
stead of just one. One subscript rep- 
resents thè row that thè element be- 
longs to, while thè second subscript 
represents thè column. Thus V(l,l) 
could represent thè first value in our 


table, located in row 1 and column 1. 
The last value in thè table would be 
V(8,5), located in thè bottom right 
corner. 

Now suppose you want to carry 
out a calculation that involves all of 
thè elements in row 3. Just place thè 
calculation within a loop that cycles 
from 1 to 5 (since there are five col¬ 
umns) and uses M% for a loop 
counter. Within thè loop thè variable 
name V(3,M % ) appears in thè calcu¬ 
lation sequence. Each time through 
thè loop, M% will have a different 
value representing thè column num- 
ber, but thè row subscript never 
changes. It always has thè value of 3. 

Another example demonstrating 
thè use of multidimensional arrays 
sometimes occurs in a database man¬ 
agement program. Suppose such a 
program had six separate sets of data, 
or ffies, for each specific entry. Fur- 
thermore, suppose that, to keep track 
of thè entries, each file required three 
pointers. 

The best way to represent thè 
pointers would be to use a two-di- 
mensional array, P% (I,J), in which J 
could have values ranging from 0 to 5 
to identify thè specific file being dealt 
with, and I could have values rang¬ 
ing from 0 to 2 to specify thè type of 
pointer used. 

Now whenever thè three pointers 
for a given file need to be manipu- 
lated (such as when a data set is de- 
leted from thè system), just identify 


thè value J should have (for example, 
J - 3) and then do a GOSUB to thè 
subroutine that manipulates P% (0,J), 
P%(1,J), andP%(2,J). 

The number of allowed array di- 
mensions may be greater than two, 
although you 11 seldom encounter 
programs having arrays with more 
than three subscripts. The maximum 
limit set by Applesoft Basic is 88 sub¬ 
scripts, which, for practical purposes, 
is no limit at all. 

It may be helpful to note that with 
multidimensional arrays, thè specific 
elements are stili stored in memory 
one right after thè other in linear 
fashion. The order in which they are 
stored is based on cycling thè leftmost 
subscript thè fastest. Thus a three-di¬ 
mensionai array, with two elements 
in each dimension, would have thè 
elements stored in thè following 
sequence: 

B(0,0,0); B(1,0,0); B(0,1,0); B(1,1,0); B(0,0,1); 
B(1,0,1); B(0,1,1); B(l,l,l) 

The following short subroutine 
(using For... Next loops) shows how 
a two-dimensional string array, 
X$(J,I), could be initialized, setting 
all 15 elements to nuli. 

10FORI - 0TO2 
20 FOR J - 0 TO 4 
30 X$(J,I) * “ " 

40 NEXT J 
50NEXTI 

Note that thè inner loop, using J as 
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“... you must teli thè computer to 
reserve space for thè array, and how 
many members of thè family will show up. ’ ’ 


thè loop counter, is also thè leftmost 
subscript for thè variable. This im- 
proves thè efficiency of thè program 
because thè loop that cycles thè fast- 
est corresponds to thè subscript that 
cycles fastest. 

Making Reservations 

One important feature about ar¬ 
ray variables sets them apart from 
non-array variables, and that is thè 
matter of having to reserve Storage 
space for any array you pian to use 
within your program. Suppose you 
pian to store 250 names in memory. 
You might wish to cali this array 
NM$, so you would have elements 
ranging from NM$(0) to NM$(250). 
(This actually gives you 251 ele¬ 
ments, but no matter for now.) Be- 
fore thè computer comes across thè 
first reference to NM$ in your pro¬ 
gram, you must teli thè computer to 
reserve space for thè NM$ array, and 
how many members of thè family 
will show up. This process is known 
as dimensioning thè array. 

Each array within your program 
should be dimensioned properly. You 
may dimension several arrays within 
thè sanie dimensioning instruction, 
but you can dimension an array only 
once within a program. Attempts to 
redimension an array will crash your 
program. (Some Basics allow you to 
delete an array from memory and 
then redimension it. Applesoft Basic 
does not.) 

Usually thè programmer will di¬ 
mension all arrays in one of thè first 
lines of a program and have done 
with it. The instruction that dimen- 
sions arrays is thè DIM statement, 
followed by each array name and its 
maximum dimension(s) in a list, with 
each entry separated from thè others 
by a comma. Below are several ex- 
amples of correct DIM statements. 


DIM A(15) 

DIM AR$(22), B%(12), FF(100) 

DIM P%(12,3), A% (25,10,2), GM$(20,3) 

The first example tells thè com¬ 
puter to reserve 16 elements in a reai 
array whose name is A. The second 
example dimensions three different 
arrays. The first is a string array, 
AR$, dimensioned for 23 elements. 
The second is an integer array, B%, 
dimensioned for 13 elements, while 
thè third, FF, is a reai array, dimen¬ 
sioned for 101 elements. (Remember 
that thè number specified in thè DIM 
statement is thè maximum subscript 
allowed for that array within thè 
program. If you dimension thè array 
using thè number N, you have N + 1 
elements when you include thè zero 
element.) 

The third example also dimensions 
three arrays, and in this example all 
three arrays are multidimensional. 
The first array, P%, has two dimen¬ 
sions and reserves space for a total of 
52 elements (13x4). The largest 
value allowed for thè two subscripts 
is P%(12,3). 

The second array dimensioned in 
this statement is also an integer array, 
but has three dimensions and spec- 
ifies that memory be reserved for a 
total of 858 array elements (26 x 11 
x 3). The third array to be dimen¬ 
sioned is a string array containing 84 
elements (21 x 4). 

Variables may define array dimen¬ 
sions in a DIM statement, but thè 
variable must have a definite legai 
value assigned to it prior to its use in 
thè DIM statement. For example, 
DIM A$(J), B(J,5) is a valid dimen¬ 
sion statement if J has been assigned 
previously to a positive integer value 
before this statement is reached. 

Although you can use a colon to 
separate several different Basic state- 
ments within a line, I prefer to assign 


thè DIM statement a line entirely to 
itself and to dimension all thè arrays I 
intend to use within a program in 
that single line. Some computer Sys¬ 
tems require that thè DIM statement 
be in a line by itself. Applesoft Basic 
also permits several DIM statements, 
but a given variable may not be 
dimensioned more than once within 
a program. 

Applesoft Basic allows one excep- 
tion to thè mie requiring that arrays 
be dimensioned. Small singly dimen¬ 
sioned arrays containing less than 11 
elements (subscripts ranging from 0 
to 10) may be used within a program 
without first being dimensioned. The 
computer will reserve space for elev- 
en elements automatically thè first 
time you reference one of thè ele¬ 
ments in such an array. However, for 
documentation purposes I suggest 
that you dimension even these small 
arrays at thè beginning of thè 
program. 

I want to include a note regarding 
strings and thè DIM statement as it 
applies to some computer systems 
other than thè Apple II and Apple¬ 
soft. Some systems require that each 
string used be specified within a DIM 
statement, with thè maximum num¬ 
ber of characters reserved for that 
single string given as thè dimension 
for thè string. 

Thus DIM A$(12) would not refer¬ 
ence a 13-element array, but would 
rather indicate that 12 bytes of 
Storage be reserved for thè non-array 
variable A$. Such use is uncommon 
with todays personal computer sys¬ 
tems, but knowing this may help you 
sometime to convert an older pro¬ 
gram to work on your System. 

Limitations on Array Dimensions 

Array size is limited only by thè 
size of available memory after your 
program has been loaded into RAM. 
Each array requires some memory 
overhead to store information about 
thè array. For numeric variables, this 
overhead consumes two bytes to store 
thè array name, two bytes to specify 
thè size of thè array, one byte for thè 
number of dimensions used by thè ar¬ 
ray, and two bytes for each dimen¬ 
sion to store thè maximum size of that 
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pletely summarize thè BASIC and Assembler manuals! 
FEATURES INCLUDE: 

memory map. eyeball graphics, math instructions, 
BASIC commands, store instructions, BASIC func- 
tions, load instructions, BASIC statements, move in¬ 
structions, special keys. exchange instructions, 
PRINT USING examples, shift instructions, BASIC spe¬ 
cial characters, compare instructions, BASIC and as¬ 
sembler messages and codes, branch instructions, 
BASIC facts, data alteration instructions. reserved 
words. I/O instructions. ROM routines, complete 
character chart with graphics and space-compression 
codes, hex-dec chart, control code cross-reference. 
assembler instructions, commands and operators. 
screen line layout, editor commands and subcom- 
mands, condition code easy access. 

Plus—“magic graphics number—a mystery until you 
learn how to use iti 

Designed as a fold-up, accordion-style card, fits in your 
pocket. Panels organized for optimum speed for 
reference. 

Apple II and Apple II Plus: BASIC and 6502 FC1008 $4.95 
Apple II and Apple II Plus: BASIC only FC1007 $3.95 

Model I: BASIC and Assembler FC1002 $4.95 

Model II: BASIC and Assembler FC1005 $5.95 

Model IhCommands and Utilities FC1010 $3.95 

Model III: BASIC and Assembler FC1005 $5.95 

Color BASIC and Extended FC1006 $4.95 

Z-80: Microprocessor FC1011 $4.95 

ZX80, ZX81 and Timex Sinclair 1000: FC1012 $5.95 

Pocket Computer BASIC FC1009 $2.95 


APPLE BASIC FOR BUSINESS: for thè Apple II— by 

Alan J. Parker and John Stewart. Unlike most introduc- 
tory BASIC books, this book uses files extensively. It is 
written specificai^ for thè Apple II microcomputer 
with DOS Version 3.2. All programs presented are com¬ 
patire with DOS Version 3.3. With thè emphasis on 
problem-solving, thè focus of this book is thè point at 
which problem elements meet language capabilities. 
BK1247 $15.95 


MOSTLY BASIC: APPLICATIONS FOR YOUR APPLE II, 
BOOK 1 —by Howard Berenbon This book provides 
you with 28 ready-to-use, BASIC language programs 
which have been completely tested and debugged for 
use on your Apple II. Includes a telephone dialer, 
digitai stop watch. spelling test, a house buying guide, 
a gas mileage calculator, and many others useful to 
busmessmen. hobbyists, scientists. and computer en- 
thusiasts. BK1251 $12.95 

MOSTLY BASIC: APPLICATIONS FOR YOUR APPLE II, 
BOOK 2—by Howard Berenbon. A second gold mine of 
fascinating BASIC programs. including two dungeons 
that test your math and history abilities and another 
one that's strictly for fun, eleven household programs. 
a monthly savings pian and six more on money or in¬ 
vestment. two that test your level of ESP. and more— 
32 in all! Excellent for beginning or advanced com- 
puterists. BK1252 $12.95 

KIDS AND THE APPLE-by Edward H. Carlson 
Whether you are a kid, a parent, or a teacher, this book 
is something unique. It starts with thè bare bones in- 
troduction to programming, leads quickly to more in- 
teresting programs, and gives anyone who uses it a 
complete knowledge of Applesoft BASIC. Lively il- 
lustrations, notes to parents and teachers and ques- 
tions for thè reader are sprinkled throughout thè book. 
While this guide is aimed at 8-16 year olds. adults will 
find it equally attractive as a beginning book for use 
thè Apple personal computer! BK1253 $19.95 


ASSEMBLY LANGUAGE PROGRAMMING FOR THE 
APPLE II—by Robert Mottolz. This comprehensive. 
easy to understand introduction provides solid 
groundwork for getting started in assembly language 
programming on thè Apple II.* Many subroutines writ¬ 
ten in assembly language are provided, and most ex- 
planations are shown with equivalent examples in 
BASIC. There's an excellent section on hexadecimal 
arithmetic included, as well as appendices for further 
study. BK1249 $12.95 


APPLE MACHINE LANGUAGE-by Don Inman and 
Kurt Inman. APPLE MACHINE LANGUAGE builds 
upon your previous knowledge of BASIC, and teaches 
you thè machine language in small, easy, completely 
illustrateci steps. Following this guide, you will be able 
to write machine language programs directly, using 
thè Apple System Monitor. Each new program is 
thoroughly presented in functional blocks, with 
sketches of how each step will actually appear on thè 
video screen. Soon you will be entering and executing 
your own machine language programs, with predic- 
table results! BK1248 $14.95 


FOR YOUR OTHER SYSTEM 


COMPUTER CARNIVAL— by Richard Ramella. Your 
child can become a crackerjack computerist with thè 
sixty TRS-80 Level II programs in COMPUTER CARNI- 
VAL. This large-type, spirai bound book for beginners 
is a veritable funhouse of games, graphics, quizzes 
and puzzles. Written by 80 Micro columnist Richard 
Ramella, thè programs are challenging enough to en- 
sure continued learning, yet short enough to provide 
your child with thè immediate delight and reward of 
mastering basic computing skills. And for even greater 
enjoyment, get thè CARNIVAL COMPANION, a 30-mi- 
nute cassette containing all thè programs in thè book. 
Eliminates tiresome typing and lets your child spend 
more time enjoying thè programs. BK7389 $16.97 
CC7389 Book and Cassette $24.97 


A* OTHI K NNYSTEKU 


THE SELECTRIC INTERFACE-by George Young. You V 

need thè quality print that a daisy wheel printer prò- 
vides but thè thought of buying one makes your waliet 

wilt. SELECTRICTM INTERFACE, a step-by-step guide lilr^ 

to interfacing an IBM Selectric I/O Writer to your micro- 

computer, will give you that quality at a fraction of thè TEXTEDIT—A Complete Word 
price. George Young, co-au\horot Kilobaud Microcom- Kit Form— by Irwin Rappaport. 
puting magazine’s popular "Kilobaud Klassroom” pensive word processor that yoi 
series, offers a low-cost alternative to buying a daisy differing needs—from form le 
wheel printer. SELECTRIC INTERFACE includes: step- Written in TRS-80 Disk BASIC, 1 
by-step instructions, tips on purchasing a used Selec- several modules, permitting thè 
tric, information on various Selectric models, includ- ly those portions needed. A disk 
ing thè 2740, 2980, and Dura 1041, driver software for provides thè direct loading of i 
Z80, 8080, and 6502 chips, tips on interfacing tech- thè book is required for docun 
niques. With SELECTRIC INTERFACE and some back- and Ili with TRSDOS CONVERT 
ground in electronics, you can have a high-quality, low- drives or copy utility needed 
cost, letter-quality printer. Petals not included. BK7388 disk). Runs under TRSDOS 2.2 
(125 pages) $12.97 under other systems. BK7387 $S 


SOME COMMON BASIC PROGRAMS, APPLE II EDI 
TION— By Lon Poole et al. A powerful collection of fi- 
nancial, statistical, home management and mathemat- 
ics programs—76 in all. Each program is presented 
with BASIC source code, operating instructions and 
descriptions. If you’re a beginning programmer you 
can learn from this book what well designed and docu- 
mented programs look like. BK1232 $14.99 

THE CUSTOM APPLE AND OTHER MYSTERIES— by 

Winifred Hofacker and Ekkehard Fioegei. This is thè 
guide to customizing Apple software and hardware, pub- 
lished by thè folks at IJG. It contains such hands-on in¬ 
formation such as: data acquisition and control applica¬ 
tions, Programming thè 6522 Internai timer, Construct- 
ing thè 6522 I/O board, An Eprom Burner for thè Apple 
Computer, An Eprom/RAM board, The Apple Slot Re- 
peater, and much, much more. BK1246 $24.95. 


For Toll Free Ordering Cali l-800-258'5473 


•Use thè order card in this magazine or itemize your order on a separate piece of paper and mail to incider Book Department • Peterborough NH 03458. Be sure to in¬ 
clude check or detailed credit card information. No C.O.D. orders accepted. All orders add $1.50 for thè first book, $1.00 each additional book for U.S. and foreign surface. 
$10.00 per book foreign airmail. Please allow 4-6 weeks for delivery. Questions regarding your order? Please write to Customer Service at thè above address. 
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particular dimension. 

A singly dimensioned array thus 
requires seven bytes for overhead, a 
doubly dimensioned array requires 
nine bytes, etc. In addition, of 
course, each element requires space 
to store its particular value. This 
space Comes to two bytes for each in- 
teger element and five bytes for each 
reai numeric element. 

String array variables have thè 
same overhead requirements as nu¬ 
meric array variables, along with 
three extra bytes per element show- 


ing thè length of that particular ele¬ 
ment (one byte) and thè location of 
thè string in thè string Storage area of 
memory (two bytes). 

Of course, in thè string Storage 
area, each string occupies one byte of 
memory for each character in thè 
string. Unlike numeric variables, 
which have their values stored in thè 
same area of memory as thè variable 
overhead information, thè specific 
values for strings are stored togeth- 
er in a region of memory leading 
down from whatever value HIMEM 


is set to. 

Specific locations for variable Stor¬ 
age and memory locations may be 
obtained from thè Applesoft Basic 
Programming Reference Marmai 
(copyright 1981 by Apple Computer 
Ine.), pages 127 and 137. 

Strings are allocated space in thè 
string Storage area dynamically. As 
thè space for string Storage begins to 
fili up, thè computer will “hang” 
(stop program processing) for a short 
time while it searches thè strings for 
old strings that have had their vari¬ 
able names reassigned. The comput¬ 
er discards these strings and packs thè 
remaining strings together, thus re¬ 
leasing more string Storage space. 

This process is automatic, but thè 
programmer can force it by using thè 
instruction: X = FRE(O). Your pro¬ 
gram efficiency will improve some- 
what if you insert this instruction sev- 
eral places in a complicated program 
that frequendy reassigns string values. 

Simplifying Data Entry Using Arrays 

Data entry procedures, particular- 
ly in database management situa- 
tions, usually require setting up a 
form to be filled in on thè display, 
prompting thè operator to enter in¬ 
formation one item at a time, and 
then allowing thè operator to correct 
any mistakes before storing thè data 
to disk. Using array variables to rep- 
resent thè displayed prompts and thè 
input data simplifies thè process of 
displaying thè data entry form and 
making any necessary corrections to 
thè information entered. 

The program listing illustrates 
how this can be done. Two arrays are 
used. The first, P$, contains thè 
prompts for each of die six data entry 
items. The second, D$, contains thè 
data input by thè operator for each of 
thè six items. This example does not 
use P$(0) and D$(0). Line 10 dimen- 
sions thè two arrays. 

Lines 20-25 use thè Read. . . Data 
instruction within a For... Next loop 
to load thè six elements of P$ with thè 
appropriate display prompts. The 
data entry routine is a subroutine 
that you can cali from thè main part 
of thè program when needed, using a 
GOSUB 1000 statement. 


IO DIM P*C 6 ),D*( 6 > 

15 DATA NAME,STREET,CITY,STATE, 
ZIP,SOC.SEC.NO. 

20 FOR I = 1 TO 6 
22 READ P*(I) 

25 NEXT I 
30 GOSUB ÌOOO 
ÌOOO FOR I = 1 TO 6 
ÌOIO D*(I) = " " 

1020 NEXT I 
1030 KX « 1 
1040 HOME 

1050 FOR 1=1 TO K% 

1060 IF 1=7 THEN GOTO 11 IO 
1070 PRINT I; H ;P*<I> 5 M : 

1080 PRINT TAB< 20) 5 " “; 

1090 IF I < KX THEN PRINT D*(I> 

: GOTO 1110 

IlOO INPUT D*<I) 

1110 NEXT I 

1120 IF F7. = 1 THEN GOTO 1200 
1130 IF KX = 6 THEN FX = 1 
1140 K7. = KX + 1 
1150 GOTO 1040 

1200 PRINT "= ========= 

1210 PRINT M ENTER THE NUMBER OF 

THE ITEM NEEDING" 

1220 PRINT "CORRECTION, OR ZERO 
IF NO CORRECTIONS. ,# ; 

1230 INPUT ZX 

1235 IF ZX < O OR Z7. > 6 THEN GOTO 
1290 

1240 IF ZX < >0 THEN GOTO 127 

O 

1250 FX = O 
1260 RETURN 

1270 PRINT "OLD ITEM: "sD^ZX);" 

NEW ITEM: "5 
1280 INPUT D*(Z%) 

1290 KX = 7 
1300 GOTO 1040 

Program listing. Using array variables to simplijy data entry. 
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When thè display forni has been 
filled out and corrected, thè operator 
enters a 0, and thè processing se- 
quence returns to thè main program 
from line 1260. Figure 3 is a flow- 
chart for thè subroutine. 

The first thing thè subroutine does 
is clear any values that might have 
carried over in thè D$ array. Then 
K%, thè data entry counter, is ini- 
tialized to a value of 1, thè screen 
display is cleared, and thè display 
loop (lines 1050 through 1110) is en¬ 
tered. In this pardcular subroutine, 
only thè items leading up to and in- 
cluding thè item currendy being en- 
tered are displayed. Thus thè first 
time thè loop is encountered, K% has 
a value of 1, so only prompt P$(l) is 
displayed. 

Furthermore, since I also equals 1, 
line 1090 is skipped and line 1100 is 
encountered, at which point thè op¬ 
erator is prompted to input D$(l). At 
this point, lines 1120 and 1130 are 
also skipped, and thè counter is incre- 
mented to 2 in line 1140. 

The program cycles back to line 
1040, clearing thè screen and en- 
countering thè data entry loop again. 
This time K% = 2, so when 1*1 (thè 
first time through thè loop), line 1090 
is executed and D$(l) is simply print- 
ed on thè screen. The second time 
through thè loop, line 1090 is skipped 
and D$(2) must be entered by thè 
operator. 

This cycle is repeated a total of six 
times. After thè sixth time K% has a 
value of 6 and line 1130 is encoun¬ 
tered that sets our “end” flag, F% = 
1. K% is then incremented once more 
at line 1140, to a value of 7, and thè 
loop is entered one last time. This 
time all six data entry items are dis¬ 
played, exactly as entered, and thè 
seventh time through thè loop, when 
1*7, line 1060 is encountered, 
forcing thè program to bypass thè 
data entry procedures and jump out 
of thè loop. 

This time, however, thè “end” flag, 
F%, has been set, so line 1120 is en¬ 
countered, forcing a jump to line 1200 
and thè portion of thè subroutine that 
handles corrections. Lines 1210 and 
1220 display thè prompting instruo 
tions for thè operator. If a zero is 


entered, then thè flag is reset (F% * 
0) and thè computer returns to thè 
main program. 

If thè operator énters another 
number (only 1-6 are allowed), then 
thè earlier entry, D$(Z%), is dis¬ 
played and a prompt is made for thè 
corrected entry (INPUT D$(Z%)). 
At this point, K% is set to 7 and a 
jump is made back to thè screen dis¬ 
play routine which erases thè old 
data entry form and redisplays thè 
corrected form, retuming once again 
to thè item correction routine. 

It should be clear at this point that 
using array variables greatìy simpli- 
fies thè task of programming rather 
complex procedures. The subroutine 
above does not require each of thè six 
items to be handled uniquely, either 
at thè data entry stage or at thè cor¬ 
rection stage. Furthermore, if addi- 
tional items are to be added, then thè 
only changes that need to be made to 
thè above program are thè actual 
numbers used that are based on thè 
maximum limits of our arrays. These 
lines that need changing are lines 15, 
20,1000,1060,1130,1235 and 1290. 
No additional lines need to be added. 

The Input statement and tests in 
lines 1230-1240 could be replaced 
with a single-stroke key board response 
subroutine that was presented in The 
Applesoft Adviser. In this case, thè 
following lines should be used: 

1230 ZZ$ = “0123456" 

1235 GOSUB 30 
1238 Z% = Z% - 1 

This assumes that lines 30 through 37 
from thè previous articles listing for 
“Menu Selection Made Easy" are in- 
cluded in thè program. 

Conclusion 

This and thè previous article might 
have been entitled “Everything You 
Ever Wanted To Know About Vari¬ 
ables But Were Afraid to Ask.” Hav- 
ing pretty thoroughly covered this 
subject, I intend to deal with thè 
For... Next looping instructions and 
thè Read... Data input statements in 
thè next article in this series. 

I encourage you to write to me 
with comments relating to these arti¬ 
cles and future topics you would like 
to see covered. ■ 
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SSD 

T he modera floppy disk is a 
wonderful piece of engineer¬ 
ing. Aside from its obvious uses as a 
coaster and for leveling desks, it can 
also be used to store data. 

Those of us who use large, cum- 
bersome files in our work often are 
inconvenienced by one of thè floppy’s 
drawbacks—slow access time. How 
nice it would be if thè information 
contained on thè disk could be writ- 
ten and read as fast as information in 
main memory. While we’re at thè 
wishing well, wouldn’t it also be fine 
to have another drive or two at our 
disposai, to jockey files and programs 
to and fro at our slightest whim. 
Synetixlnc., 15050 NE 95thSt., Red¬ 
mond, WA 98052, has introduced a 
product that solves all these problems 
with ease. 

The SSD, or Solid State Disk, be- 
haves in operation exactly as would 
an extra drive. Two versions of thè 
SSD are available. One emulates one 
disk drive, thè other, two. Various 
combinations of thè boards, such as 
one dual and a single or two duals, 
may be used to act as three or four 
additional drives, respectively. All 
control circuitry is on thè board itself. 

Physically, thè SSD is a hefty piece 
of electronics, reaching from thè 
back piate of thè Apple II to within 
an inch of thè keyboard control 
board. Installation could not be sim¬ 
plex The SSD plugs into slot 5 of thè 
bus, taking power directly from thè 
Apple's supply. No additional hook- 
up is needed. 

Apple DOS 3.3 works with SSD 
via thè software included with thè 
board. Optional driver software is 
available for Apple Pascal 1.1, as 
well as CP/M. 

My Apple spends most of its time 
running under CP/M, usually doing 
word processing with Wordstar. No 
small program, Wordstar sometimes 
gets in my way on thè disk, since it 
must be on line whenever it’s used. 
The SSD seems to be just what thè 
doctor ordered. After booting CP/M 
and thè driver software, I load 


Wordstar onto one of thè Solid State 
Drives (drives C: andD:), leaving thè 
reai drives (A: and B:) open for what- 
ever literary gems I may generate. 
The Constant starting and stopping of 
thè drive holding Wordstar is gone, 
and two full (or should I say empty) 
disks are available for permanent 
data Storage, in addition to thè space 
on thè SSD itself. 

The documentation included with 
thè board is complete and thorough, 
albeit occasionally difficult to follow. 
Sample assembly language source 
programs for interface to thè board 
are offered for thè more adventurous. 
Along with thè driver software on thè 
disks, Synetix includes source code 
for any who wish to customize thè 
programs—a nice touch. 

One of thè Utilities included allows 
you to format thè dual version of thè 
SSD as one 32 sector disk, rather than 
two 16 sector disks. Very large data 
files can then be manipulated more 
easily and more quickly than other- 
wise possible. 

Does thè SSD do thè job? If thè job 
involves thè rapid access of large 
amounts of disk-based data, such as 
large database files, thè answer is yes. 
I found thè SSD behaved as prom- 
ised, just as two more disk drives 
would, except much faster. The SSD 
is handy when making a large num- 
ber of copies of a file or program. By 
putting thè originai onto thè SSD, 
copy time is cut in half in most cases. 

On thè negative side, thè SSD can- 
not be used for thè permanent Storage 
of data. Being a volatile memory, 
any loss of power to thè board causes 
information on it to evaporate. You 
must not reboot by tuming thè main 
power to thè computer on and off 
when thè SSD contains needed data. 

Certain self-booting and protected 
programs will not work with thè 
SSD, nor will those that use oddball 
disk-access routines. However, there 
are few programs falling into this lat- 
ter category. In most instances 
everything works fine. 

The sheer size of thè board can 
cause problems now and then. Being 
very front-heavy, it has a tendency to 
tip forward with time, possibly losing 
proper connection with some con- 


tacts in thè bus. A welcome addition 
would have been a small plastic or 
rubber block to support thè far end of 
thè unit. A small square of cardboard 
seems to do thè trick nicely for me. 

At retail pricing thè SSD is a good 
value when compared to thè cost of 
adding two additional drives and a 
controller card to your Apple. Those 
items from Apple retail for $940, 
while thè dual-drive SSD card can 
be had for $690. Three hundred nine- 
ty dollars will get you thè single 
drive card. 

All things considered, thè SSD 
board is a welcome addition to my 
System, in terms of both versatility 
and speed. I can recommend this 
product to anyone wanting to im¬ 
prove thè data handling functions of 
thè Apple computer system. ■ 

Chuck Doherty 
South Dartmouth, MA 


The Sensible Speller 

A ccording to thè laws of nuclear 
physics, an action or reaction 
takes place when criticai mass is 
reached. In thè world of micros, thè 
Apple II computer has achieved criti¬ 
cai mass, with about 400,000 units 
sold worldwide. Apple software is 
abundant. Due to this broad base of 
potential buyers, and, of course, 
competition, thè low cost of many ex- 
cellent programs is maintained. In 
thè field of serious software, word 
processore for thè Apple are available 
with many sophisticated features not 
yet incorporated into office-type 
dedicated systems. 

An example of thè present state of 
Apple software is thè appearance of 
several spelling checkers, a useful ad- 
junct to thè task of processing words. 
There are a minimum of five differ- 
ent software houses now offering 
software help for spelling errore and 
typographical mistakes. 

The Sensible Speller (TSS) is thè 
best friend a writer could have, and is 
thè only program of its kind that 
works with Super-Text, including thè 
latest 40/80 and 40/56/70 column 
versions. The price is a reasonable 
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I run out of memory?" 


Most peopledo run out of memory 
with only 18K VisiCalc* workspace. 
But you can expand your Apple 11* 
to 177K VisiCalc memory! You 
can also get 80-column display, 
lower case letters, and hard disk 



support—all without buying 
a bigger computer. 

The Saturn expansion System for 
VisiCalc consists of a preboot dis¬ 
kette, one or more plug-in RAM 
boards, and an optional 80-column 
display board. You can put thè 
Saturn boards in any slot. And with 
all that memory, our software lets 
you save files on more than one 
diskette. 

Each Saturn RAM board includes 
additional software for other pro- 
gramming applications. So your 
BASIC, PASCAL, and CP/M pro- 
grams get an extra bonus. 


Ask your computer dealer for 
more details about thè Saturn 
memory expansion systems. See 
how much bigger and better your 
models can become! 

* VisiCalc is a registered trademark of VisiCorp. Apple II is a 
registered trademark of Apple Computers, Ine. 

sjtw&k 
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PO. Box 8050 
3990 Varsity Drive 
Ann Arbor, MI 48107 

1 (313) 973-8422 
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“The Inflation Fighter is Here 

The" « oraiskse+”$995 w 


Finally, a dynamic powerful, practical personal computer that Is 
fully Franklin Ace 1000 and Apple p II compattale, yet, lower in 
pnce than thè competition. Uses existing available software. The 
“ORANGE+” is thè pacesetter of thè future, with a switchable 
110-220 volt power suppfy, upper and lower case with lower 
case lockìns key, enhanced audio and color functions, 8 slot 
mothertaoard, game port, fully socketed I.C. board, a 3 ROM 
operating System, 48K ram, fully expandible. 

The ‘ ORANGE+” will interface with peripherals that will work on 
both thè Franklin ACE 1000 or thè Apple” II. Thousands of 
existing software programs, hardware, games, peripherals and 
accessories will plug right into thè New “ORANGE+” COMPUTER 

Best of all is thè Price 

The “ORANGE+” could easily be sold for $1500.00, But no, thè 
inflation fighter retail pnce is only $995.00, thats right, Only 
$995.00 


Schools, Groups and Companies can now purchase a quality 
computer at a down to earth pnce. At these prices, now 
everyone can afford a powerful personal computer for work or 
play, add various peripherals and software to build a powerful 
computer that can do everything thè cpmpetition can, but for a 
lot less money. 

Ask your favorite dealer for thè “ORANGE+" today, if he doesn't 
have one in stock teli him to wnte or cali his locai distributor 
now. 

The “ORANGE+” is fully Apple II and Franklin ACE 1000 compattale. 

The “ORANGE+” is fully warranteed for 90 days, with a 9 month 
extended warranty available for an additional $99.00. 

Watch for future exciting products from thè manufacturers of 
thè “ORANGE+” COMPUTERS. 

Selected Distributorships Available Dealer Inquiries Invited. 


For further Information, contact Collins International Trading Corporation, 16311 Ventura Blvd., Suite 500, Encino, California 91436. 


Franklin ACE is a trademark of Franklin Computer Corporation 
Apple is a registered trademark of Apple Computer Ine 
Orange+ is a trademark of Collins Int erna tional Tradin Co ratior 
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$125. This includes a backup prò- one file to another. Otherwise, TSS you avoid using thè same word too 
gram disk, two dictionary disks is as fast as advertised. often. 

(Main and Supplementary) and thè Any word not in thè dictionary is 

Random House Concise Dictionary highlighted in context. You have 

in hard cover. The latter is thè basis Checking Options four c hoices: 

for thè program’s vocabulary. TSS Every word in thè selected file is The default is to (I)gnore this oc- 

also checks spelling of text editors checked against as many diction- currence. An example is a proper 

that use standard Apple 3.2 or 3.3 aries as you wish. The main diction- name, although frequently used 

DOS, CP/M or Pascal files. ary disk initially contains about names might as well be added to thè 

The program was ordered by 44,000 words. It is quite a feat of dictionary. 

phone on a Tuesday and arrived on programming to fit that much data (A)dd means just that. Adding 

Thursdayby U.S. mail. TSS was easy onto a single density five-inch Apple names comes under what I would 

to learn—I was correcting files of a disk. Yet, space is left for about cali a pet vocabulary. After using 

book I am writing two hours after sit- 11,000 additional words. Being able TSS for a while you should not find 

ting down to leam thè program. The to add your own selection of words is very many words to add. 

program must be crash proof, as I absolutely essential for satisfactory The third choice is (L)ist. Any 
never had to reboot. operation. I suggest that you do not word in thè dictionary can be listed 

This review is bàsed primarily on buy any spelling checker without using wild cards to find thè correct 
my experience using TSS with Su- this feature. spelling. 

per-Text. I also used TSS experimen- The supplementary dictionary The last choice is (M)ark. Any 

tally with a few 3.3 Apple DOS disk contains thè balance of words word to be corrected is marked with 
binary and text files. No difference. extracted from thè Random House a Symbol of your choice for later cor- 
The speller should work equally well hard cover lexicon—words used less rection. The main point in choosing 
with either CP/M or Pascal. A brief frequently. I employed TSS for over a character for marking words is to 
word about spelling checkers is in a month before writing this review, pick one that is easily found with thè 
order before continuing. and I have added about 350 words, word processori global search and 

Spelling checkers do not correct including names, to my copy of thè find feature, but does not occur in * 
your mistakes—automatically or main dictionary disk. I did not use normal text. 

otherwise. They won’t know when a thè supplementary disk as I prefer to In order not to bother with text 
word is used incorrectly but spelled use only one dictionary disk. I con- formatting commands, there are 

correctly. A sentence, such as “I rode structed my own personalized col- two opportunities to teli TSS to ig- 

this peace with a pin,” is accepted as lection of words. nore words that start with any sym- 

having no spelling mistakes, even While thè program disk is copy boi on thè Apple keyboard. To give 

though thè sentence would make protected, thè disk containing thè just a few examples: 

more sense written as “I wrote this vocabulary is not. You are encour- When using Super-Text, you may 
piece with a pen.” aged to duplicate it, as you must want to ignore words starting with a 

Spelling checkers compare words make a new copy every time you control character. When using Ap- 

in your file against a list of words in want to add (or delete) words. Since plewriter, you want to ignore words 
thè program dictionary. If thè spe- you’ll expend considerable effort in starting with an exclamation mark. 
cific word is not included, it is pre- constructing a personal vocabulary, ScreenWriter II and The Executive 
sented to you for consideration. you don’t want to lose it by writing Secretary use a period followed by 
What happens with Sensible Soft- over thè latest version of your disk, two or more letters. TSS will ignore 

ware’s spelling checker is simply Backups are extremely important. these or any others once pro- 

this: You compose your document in A minimum of three copies of thè grammed to do so. 
thè usuai way, then save thè file to dictionary disk are highly recom- The same dictionary disk can be 
disk. After exiting thè program, load mended. This doesnt include thè used for all versions of The Sensible 

thè Sensible Speller, answer a few disks you receive with thè package. Speller. This means that you can use 

straightforward questions, and your Those are best write-protected, used thè same vocabulary with more than 

opus will be processed for spelling only once to make thè first copy, and one WP. Sensible Software will be 

and typographical errors. then filed away for emergency use releasing legai and medicai versions 

You may want to correct more only. in thè near future, 

than one file before returning to thè In thè process of checking your As I mentioned, you can list words 

WP program. Once options for spelling, TSS gives you a count of thè to thè monitor or printer. I have one 

checking are set, TSS remembers total and unique words in a file. I small criticism in this regard: When 

your parameters, and, almost auto- found this information useful. The listing words from your file or thè 

matically, looks at thè spelling. If ratio of unique to total words gives dictionary to thè monitor, it is obvi- 

you write a lot, word processors al- an indication of writing style. You ously necessary to determine thè 

lowing large files are an advantage. can also have thè number of occur- speed with which your words ap- 

Much time is consumed going from rences of each word listed, to help pear on thè screen. This review con- 
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tains about 600 unique words. How 
much time would I want to spend 
viewing them? The TSS program- 
mers selected thè game paddle to de¬ 
termine reading speed, which gives 
a theoretical choice of 255 speeds. I 
dislike using paddles, and would 
prefer using thè number keys to 
change speed, which, at thè same 
time, could stop and start viewing. 

Documentation consists of a table 
of contents, 47 pages of instructions 
and an index. All of Sensible Soft- 
ware’s manuals are brief, but in this 
instance thè documentation is more 
than adequate. The Sensible Speller 
is one of those rare programs which 
seems to have been designed by a po- 
tential user. The documentation is 
hardly needed. This spelling checker 
is logicai, therefore friendly. If you 
use your Apple for word processing, 
you really should own TSS. 

To use TSS you need an Apple 
with 48K of RAM, one or more disk 
drives and DOS 3.3. Two drives are 
highly recommended, since you can- 
not add or delete words with one 
drive. TSS is available from Sensible 
Software, 6619 Perham Drive, West 
Bloomfield, MI 48033. ■ 

Jerry Brieger 
Redmond, WA 


Teleport 


D imension disaster! You’ll find 
everything from thè curses of 
frustration to thè smile of victory in 
Teleport from Cavalier Computer 
Corporation, PO Box 2032, Del 
Mar, CA 92014. And believe me 
when I say Teleport is not a game for 
thè rank amateur. A combination of 
skills is required to max this arcade 
delight. 

Your mission is to stem thè tide of 
aliens teleporting into your dimen¬ 
sion. These aliens look like renegades 
from a George Romero nightmare 
and wander about in aimless confu- 
sion, hostile to any physical contact 
with your defending guards. 

But perhaps thè tale is getting a 
wee bit ahead of itself. Teleport is 
written for Apple II with 48K bytes 
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RAM and one disk drive. When you 
boot thè game disk in thè normal 
manner, thè title page appears on 
thè monitor, requesting your prefer- 
ence for keyboard or joystick mode. 
I started with a joystick, but later 
found thè keyboard more respon¬ 
sive. Either way, you control a hi-res 
character whose job is to patrol a 
sector of your dimension. Using thè 
keyboard, thè left and right arrow 
keys control movement in thè corre- 
sponding directions, and thè A and Z 
keys move your guard up and down. 
Pressing thè space bar, or thè joy¬ 
stick button in that mode, makes 
him fire a stun ray at one of thè 
motile aliens. 

Control-C modulates thè volume 
of thè sound, while control-S turns 
thè sound on and off. There’s a con- 
trol-V option for those who have 
Votrax connected to their Apple. 
The escape key is available to pro¬ 
vide refreshing pauses every now 
and then. If you despise continuing a 
game you’re losing, use control-R to 
restart at any point. 

The aliens teleport with a great 
deal of graphic fanfare. Their shim- 
mering presence can be detected far 
ahead of their actual arrivai in your 
dimension, affording you time to 
position your guard for a stun. 

Initially there are five aliens on 
thè screen, compared to your three 
guards. Should you rid thè dimen¬ 
sion of one alien, lo and behold, it’s 
replaced by another. The only meth- 
od for their disposai is thè stun 
rifle—and a guard must be directly 
in front of a wandering intruder to 
fire. If your aim is true, thè alien 
stops moving and is encased in what 
appears to be a cocoon. This cocoon 
must then be dragged around thè 
screen by thè guard as he seeks thè 
twirling infinity door, through which 
he must pass with alien in tow. Then 
Zowie! The alien disappears, and thè 
scoring record at thè base of thè 
screen displays thè new count of aliens 
teleported out of your dimension, 
your current score and thè number of 
guards you have remaining. 

Don’t run into another alien. Fir- 
ing thè stun rifle again won’t do any 
good. It has only enough power to 


stun one alien at a time. This means 
Constant avoidance of thè menacing 
meanies, whether you have an un- 
conscious alien in tow or not. Any 
contact, and one less guard at your 
command. 

Both stunned and transported 
aliens are worth 50 points. All told, a 
successful teleport of a stunned alien 
garners 100 points. 

There are two other characters 
you should watch for as you defend 
your dimension. One is a Happy 
Star, easily identifiable by its five- 
point configuration and thè smile 
broadly beaming on its face. Touch 
it and you get an additional 200 
points. This personable fellow is a 
joy to behold and a pleasure to grab. 
Yet, there is another star, a Mean 
Star, you must avoid at all costs. 
Touch it and you’re destroyed. 

You may select any level of play 
you feel confident enough to tackle. 
This feature is especially attractive 
to experienced players who wish to 
test their expertise at Teleport 
without bothering with those lower- 
level scenarios I find so challenging. 

Cavalier Computer has done a 
very good job, and hasn’t followed 
thè trend of charging over $30 for a 
piece of game software. The price of 
$29.95, which I stili consider high, 
is, taking other software prices into 
account, within thè range of reason 
for a single game. I recommend 
Teleport for your software game 
library. ■ 

Hartley Lesser 
inCider staff 


Wordrace 

H ere’s a program that brings a 
whole new dimension to thè 
multiple guess quiz. Wordrace pits 
players against Webster, each other 
and thè clock. 

This diabolical vocabulary game 
incorporates a digitai counter that 
registers 600 points at thè beginning 
of each turn, and rapidly counts 
down to zero. The clock starts when 
you hit thè return key. A word ap¬ 
pears near thè top of thè screen, with 
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a choice of six definitions under- 
neath. If you choose rapidly and cor- 
rectly, you’re rewarded with a high 
score. But alas, wrong answers 
result in loss of those hard-earned 
points—and thè quicker your 
answer, thè more points subtracted. 

Worse yet, thè program an- 
nounces your mistake to everyone 
within earshot. There is no graceful 
escape from a word that stumps you. 
If you prefer quiet ignominy, you 
might want to disable thè speaker on 
your Apple. The software does not 
offer this option. 

Three vocabulary levels are avail- 
able. The “beginner” game includes 
everyday words like deluge, elderly, 
campus and intelligible. This level 
would challenge most youngsters, 
and is playable by adults because of 
thè time element. Remember, thè 
highest score goes to thè player who 
can read 9 comprehend and correctly 
respond quickest. 

The “regular” game presents a 
considerably more difficult word se- 
lection. At this level, skill disparities 
between players are soon revealed. 
Ifs a great chance to show off to 
your friends, if that sort of thing im- 
presses thè crowd you move in. The 
database is large enough to keep thè 
game going without a lot of duplica- 
tion, though you could, I suppose, 
devote a large block of your time to 
memorizing all thè words. That 
might help raise your score on thè 
next standardized test you’re obliged 
to take, but it also might alienate 
your remaining friends. 

O.K., so you’re H.L. Mencken, 
William F. Buckley and Theodore 
Bernstein all bound up in one super- 
human approximation of thè Ameri¬ 
can Heritage Dictionary . You’re 
ready for thè Challenge Game. The 
vocabulary in this section is truly ar¬ 
cane. According to thè pamphlet 
that accompanies Wordrace, “These 
words are all legitimate English 
words.” But mortals shouldn’t ex- 
pect to recognize all or even most of 
them. The staffers here at inCider, 
most of whom are fairly comfortable 
with thè English language, were gen- 
erally reduced to random guessing. 
This part of thè game really isn’t fun. 


Perhaps thè publisher of Wordrace 
got thè hint, because a supplemen- 
tary disk, offering another level of 
play, is available separately. The “in¬ 
termediate” vocabulary is somewhere 
between thè first and second levels on 
thè main disk. Ifs appropriate for a 
broad range of language skill, but is 
aimed specifically at teens. 

The supplement also contains 
Claim to Fame, a test of your generai 
historical knowledge, and Sports 
Derby, which tests sports recali. Both 
sections provide a good game. 

Claim to Fame asks for thè identi- 
ties of a wide variety of historical fig- 
ures; authors, scientists, generals and 
politicians share thè screen. Some 
will be easy for any literate player, 
but others are suitably obscure. Play- 
ing a few rounds of Claim to Fame 
could boost your familiarity with a 
number of folks worth knowing 
about—an interesting selection 
populates thè game. 

Sports Derby nicely complements 
thè other components of thè two 
Wordrace packages. If you can iden- 
tify James Naismith’s contribution to 
thè sports world, and you’re equally 
familiar with thè special talents of 
Frank Selvy and K. Abdul-Jabbar, 
you’U rack up thè high score in this 
competition. 

Wordrace is produced by Don’t 
Ask Software, 2265 Westwood Blvd., 
B-150, Los Angeles, CA 90064. The 
master disk sells for $24.95. The sup- 
plementary disk, Accessory fi, costs 
$19.95. ■ 

Linda Stephenson 
inCider staff 

Serpentine 


^^erpentine, by Broderbund Soft- 
kjware, is an arcade game with an 
unusual twist...snake-eat-snake. 
The object of thè game is to rid a 
maze of hostile serpente and live to 
teli thè tale. 

You command blue snakes while 
your opponent, thè computer, Con¬ 
trols thè orange ones. At thè start of 
thè game you have three of thè slinky 
creatures, but you can control only 


one at a time. The computer, on thè 
other hand, has thè use of its whole 
trio. That’s a ratio of three-to- 
one... not good! 

You must either avoid or consume 
thè opposing snakes. Big ones con¬ 
sume little ones when they meet 
head-on. If thè snakes are of equal 
size, yours loses. The only advantage 
you have at this point is your reptiles’ 
greater speed. Sneak-attacks are rec- 
ommended—approaching an enemy 
snake from behind and gnawing on 
its tail. Once thè enemy snake is 
shorter than yours, you can dare to 
meet it face-to-face. 

A snake is constructed of segments, 
not more than seven in number. It 
can add a segment by consuming 
another snake’s head, which requires 
a head-on assault. 

Snakes lay eggs, losing a segment 
for each in thè process. Eating enemy 
eggs is another way to grow. fi an egg 
survives long enough, it hatches into 
a two-segment snakelet. 

Frogs also live in thè maze. They 
are rather tasty morsels, if you can 
catch them, and each is worth an ad- 
ditional segment. However, watch 
out, they eat snake eggs. 

Once all of thè enemy snakes are 
gone, thè eggs yours have laid hatch— 
if you get back to home base before a 
frog eats them. The hatchlings move 
to thè stable, and a new maze is con¬ 
structed. Now you and your brood 
can start thè whole process over again. 

You score points when your snake 
eatsafrog, an enemy egg or a tail seg¬ 
ment. As you go up in point level, thè 
value for tail segments increases as 
well. Consuming a serpent head be- 
stows doublé point value. You receive 
extra serpente at various levels. 

To control your scaly steed use a 
joystick or your own defined keys. I 
find thè keyboard easiest, with thè I, 
J, K and M key combination control- 
ling thè four directions. The escape 
key interrupts and resumes play— 
handy if you must stop to answer thè 
phone or your spouse. 

You can switch between keyboard 
and joystick during play, as well as 
change thè horizontal and vertical 
axes of thè latter if necessary. Sound 
may be on or off, and pressing return 
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displays thè high scores. To save thè 
high scores, I had to cut out thè write 
protect notch on thè game disk. You 
can enter your intitials beside your 
personal high score. 

The entire package is excellent. I 
have loaded and played Serpentine 
using three different brands of disk 
drives. The instructions that accom- 
pany thè software are clear, thè 
sounds (trumpet fanfares, growling 
snakes, cracking eggs and frogs that 
‘ribbit’) are interesting. Clear color 
and smooth animation add stili fur- 
ther enjoyment to thè game. 

Not everything is perfect, how- 
ever. If you use a monochrome moni¬ 
tor, you can’t teli thè difference be- 
tween yours and an enemy snake. It 
is also difficult to detect when one 
snake is longer than another, unless 
thè difference is extreme. When a 
color monitor is used, these com- 
plaints are no longer valid. 

There are also a few problems with 
thè game itself. Whenever my snake 
lays an egg on thè far right of thè 
maze, some kind of ghost frog eats it. 
Sometimes thè computer cheats and 
sends a one-segment snake from its 
stable. Then thè machine appropri- 
ates my snake and sends it over such a 
long route home that its unprotected 
egg gets eaten in thè meantime— 
very aggravating. I also wish there 
were different skill levels available. 

Serpentine is one of my favorite 
games, despite its occasionai short- 
comings. The action can be extreme- 
ly fierce, especially at level seven and 
above. It’s very hard not to enjoy 
Serpentine! ■ 

Lee Sumner 
Dallastown, PA 


Free Fall 

F ew human experiences are met 
with more ambivalence than 
falling. 

Everybody loves falling in love, 
but a nighttime dream of falling is 
usually accompanied by fear and 
anxiety. Skydivers live for thè 
moments of free-falling “flight,” 
while lovers will have a falling-out 
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and rush to their rooms in tears. 

A sense of helplessness mingles 
with one of ecstasy when our feet 
leave thè ground. The six-year-old 
knows of this paradox through leaps 
from thè pool high board. It is an 
unbeatable combination to many, 
and an addiction for some. 



Computer games, at their best, let 
you glimpse an unknown world— 
taste experiences you may never 
otherwise explore. You know they’re 
not reai, that thè wrong step leading 
to a premature death also leads to thè 
beginning of another game. Reincar- 
nation is as dose as thè reset key. 

The chance to play with forces, ex¬ 
periences and environments outside 
of your normal day-to-day world 
brings you back, repeatedly, to thè 
glowing land of phosphor. Imagina- 
tion gets free rein as you step off into 
thè world of thè unknown. 

Upon entering thè game of Free 
Fall you cling to an ascending beam 
that carries you to thè ceiling of a 
chamber. Arms straining, you inch 
your way out into thè room. You look 
down, see floating objects passing 
below and savor thè safety you enjoy. 

Then you let go! Ah—that mar- 
riage of helplessness and ecstasy. 
You Ve let go; there s no turning 
back. You know that riches and re- 
wards lie below, but what a strange 
trip you face on thè way down. 

You glide past floating beams, 
tempting prizes and exploding bombs 
with no more that thè slight lateral 
control of thè skydiver. A crazily ric- 
ocheting ball adds just thè right note 
of abandon to your journey. 
Whiz—it passes your left foot. Want 
a rest from your free-fall? Grab onto 
one of those beams. Let go when 


you’re rested. You may even be car- 
ried back out of this strange world 
and get another free elevator ride to 
thè ceiling. See a cherished prize? Ma- 
neuver dose enough and it’s yours. 

But what would an environment 
like this be without danger? Occa- 
sionally a deadly needle rises like a 
bubble of poison gas, ready to rudely 
interrupt your sojourn with gravity. 
And that bouncing ball seems to have 
thè fearsome habit of exploding thè 
bombs it meets. Watch out for thè 
spreading shrapnel! 

You’d think that a successful de- 
scent through this bizarre world 
would be rewarded with a soft land- 
ing and great riches, but no, another 
challenge is waiting. You must fall in 
just thè right spot—four holes to be ex- 
act, each closing as you pass through. 

And there you’ll find a reward! 
You pass to another room. Though 
similar in nature and skill require- 
ments to thè first, subtle differences 
add excitement as you eagerly make 
your leap again. This bip-bop world 
complements thè first world of gird- 
ers and precedes another world of 
gunners. Three falls through space, 
three falls in time. 

Mark Turmell and Sirius Software 
have scored again with an innovative 
and exciting creation. Implemented 
for a 48K byte Apple II or II + with 
one disk drive, thè program provides 
flexibility of use with either a 13 or 16 
sector controller, and may be played 
with keyboard, Apple-compatible 
paddle, or Atari-type joystick con- 
nected to a Sirius Jovport. 

Convenience commands allow for 
pausing during thè game as well as a 
“no-sound” option. The sound that is 
provided is lively and supportive of 
thè action. Skill levels are available 
and advance automatically with each 
round of play. 

So, drop into a strange new world, 
let go of your preconceived notions of 
reality, and fall for a new adventure 
with Free Fall. It’s a release! 

Free Fall is available from Sirius 
Software, 10364 Rockingham Drive, 
Sacramento, CA 95827. Price is 
$29.95. ■ 

David S. Bryan 
Sausalito, CA 








Apparati TED-1000 is thè flrst disk drive to break thè $300 price barrier. Using thè Shugart single sided, 40 track drive 
gives thè TED-1000 thè reliability you want. And having a full 160K bytes (formatted capacity) makes you wonder how we can 
offer it at this price, not to mention thè 120 day warranty. And one more thing, thè TED-1000, in its matching Apple case, 
comes with a shielded cable to eliminate interference. 


Apple add-ons from Apparai that 
won’t add-up 

• Prom Blaster. New lower price and easy to 
use software, programs most 4K to 64K bit 
24 pin EPROMS. Runs under Apple-DOS, 
complete package — $119. 

• SPOOI/64. 64K extemal hardware print 
spooler, parallel interface, buffers 32 pages 
of output, user programmable — $319- 

• APEX. Operating System geared for 
assembiy language programming — $50. 


Handy Disk. Utility programs and device 
handlers for thè APEX operating System — 
$ 20 . 

XPLO. Block structured, Pascal type high 
level language, operates under APEX — 
$40. 

Pascal General Ledger. Menu driven 
generai ledger program based on thè 
Osborne System, customized utility — 

$79. 

The Extender. Extends Applesoft with 
functions like: print using, auto line 
numbering, dec/hex conversion, screen fili 
and more — $25. 


Additional savings on peripherals 

• Prìnters — A variety of thè newest C. Itoh, 
NEC and Okidata prìnters available. Cali 
for prices. 

• Monitore — High resolution Amdek, 
Zenith, and NEC monochrome and RGB 
monitore at big savings. Cali for prices. 

Apparat warrants and Services all of thè 
products we sell. Cali toll free to order any of 
thè products listed here, or to flnd out more, 
write Apparat, Ine., 4401S. Thmarac Parkway, 
Denver, Colorado 80237, (303) 741-1778. 

Tb order any product cali 

800 / 525 - 7674 . 

Apple II and IH- are tradenarts of Apple Computer Ine. 


s 

A, Apparat. Ine. 


Circle 75 on Reader Service card. 
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Bug Attack 

H ow often have you cursed thè 
aggressive ants that attack thè 
prize cantaloupe in your garden? Or 
perhaps your mangoes have fallen 
prey to thè medflies? Have miserable 
millipedes ever consumed your leafy 
lettuce and award-winning cauli- 
flower? Well, put down that can of 
Black Flag. Hide your Raid, and 
throw out your Ortho Tornato Dust. 
Cavalier Computer has come to 
your rescue with their Bug Attack. 
Bet you thought you had no ally in 
that truck garden of youre, eh? You 
do. Author James L. Nitchals is a 
true friend, indeed. 

What better way to destroy thè 
crop invaders than with a non-cor- 
rosive, completely naturai, pest pur¬ 
gative? Using paddle 0, or keypress- 
ing A and S on thè keyboard for left 
and right movement, you manipu- 
late a beètte agàitist thè marauding 
miseries. Your offensive weaponry 
consists of an unlimited supply of 
stingere fired by your emissary of de- 
struction. These missiles are activat- 
ed by pushing button 0, or thè space 
bar if in keyboard mode. 

By moving thè beetle across thè 
bottom of your monitor, you must 
avoid thè Constant barrage of knives 
thrown by thè invading insects. 
This is no easy task, even for a bat- 
tling beetle. At thè same time, your 
berserk bug must fire at thè oppos- 
ing forces. And herein, my dear 
gardeners, lies thè trick. The arro- 
gant aggressore manage to move 
rather rapidly, and are also adept at 
hiding behind thè plants in your 
garden. Green thumb or not, main- 
taining a pest-free garden is near 
impossible. 

The horticultural hothouse 
planned by Cavalier calls for you to 
defend three types of gardens. First, 
a cactus garden, followed by a do¬ 
ver garden, and finally a flower gar¬ 
den. Ants lead thè insect invasion 
initially. They are slow, but take 
their toll of your defender beetles. 
On completing this level, monstrous 
millipedes crawl over your screen 



... don’t allow them to meet your 
beetle at thè bottom of thè screen! 
Lasdy, thè malignant medflies do 
their darndest to upset thè naturai 
balance of your edible and orna¬ 
mentai crops. 

The garden gets progressively 
more difficult. For thè novice play¬ 
er, screams of agony and head slam- 
ming become automatic responses as 
Bug Attack atomizes your confi- 
dence. Your three beetles soon disin¬ 
tegrate. Not a pleasant spectacle. 
Even experienced players are hum- 
bled by thè game. 

Each destroyed belligerent is 
worth 20-50 points. Should you de¬ 
stroy your own plants during a de- 
fensive barrage of stingere, you get 
one point for each succulent, dover, 
or pulverized blossom. However, 
plants that remain intact at thè con- 
clusion of a successful defense are 
worth five points each. Any leftover 
fuel is worth ten points per unused 
second. Speed can make thè differ- 
ence between a mediocre and a good 
score. 

The escape key will halt thè game. 
Any other keypress continues thè ac¬ 
tion. Cavalier also performs marvel- 
ous music and sound effects for Bug 
Attack. A fine game. Guaranteed to 
drive one buggy from start to finish. 
Let’s hope your copy will produce a 
Victory Garden. 

Bug Attack is available from Cav¬ 


alier Computer, PO Box 2032, Del 
Mar, CA 92014. ■ 

Hartley G. Lesser 
mCider staff 


Type Attack 


I nvasioni Invasioni Attacking let¬ 
tere closing in! There is only one 
way to get rid of thè angry lettere. 
You have to type them right out of 
thè sky. Good. Got thè firet group. 
Oh, no, radar picking up another 
group! This time they’re even closer 
to my gunsl Good, got them. Even 
got awarded three trophies from thè 
firet three attacks. Radar picking up 
lots of fierce and angry words on thè 
screen! Good, we shot them down, 
Type Attack, by Jim Hauser and 
Ernie Brode, comes from Sirius Soft¬ 
ware. It is designed for thè Apple II 
computer with 48K bytes RAM and 
one disk drive. Your mission is to 
shoot down lettere and words. The 
underlying goal is -to improve your 
typing skills. 

All during play a red bar at thè 
left edge of thè screen shows your 
typing speed. Lessons 1 to 39 pro¬ 
gress rather liké a typing manual. 

The game consists of a Letter At¬ 
tack, followed by a Word Attack. 
You firet practice typing thè lettere 
by themselves in Letter Attack, and 
then in combinations in Word At¬ 
tack. Whenever possible, commonly 
used words are shown. 

After you boot thè disk you will 
choose from thè menu. The choices 
are: select a speed, start a lesson, 
create a lesson, start a new game, and 
play an old game that was saved. 

Selecting thè speed determines thè 
speed at which thè lettere and words 
move on your screen, and also thè 
bonus points you get. Beginnere 
should select a speed from 1 to 19. If 
you*re an intermediate player, you 
should select a speed from 20 to 50. 
Good typists should choose in thè 60 
to 79 range. 

You can choose one of thè lessons 
from 1 to 39. If you re a beginner, 
start with number 1. You can also 
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program lessons 40 to 99 yourself. 
Create a lesson by first entering thè 
lesson number, such as 40. Then 
enter thè letters to be used for thè 
Letter Attack. The first two attack 
waves are thè combinations you in¬ 
put, while thè third attack wave is 
all scrambled up. 

To create a Word Attack type in 
words (12 characters or less) on a 
line. If a word you're using is less 
than 12 letters, you have to use thè 
spacebar to fili it out. The left arrow 
key moves thè cursor back or down, 
thè right arrow moves it up or for- 
ward. The return key is used to 
move thè cursor over a column or 
row in Letter Attack, or to thè next 
word or last word in Word Attack. 
Control-D saves your lesson to disk; 
control-V changes thè direction of 
thè arrow and return keys. The 
double-pointed arrow on thè right 
side of thè screen shows thè current 
direction. Escape will end Create a 
Lesson and go to thè menu without 
saving thè lesson to disk. Start a New 
Game and Play an Old Game are 
self-explanatory. 

A Letter Attack occurs in three 
different waves, each consisting of 
eight columns. The wave appears at 
thè top of thè screen and reaches to 
thè bottom. Only thè bottoni char- 
acter of each column is vulnerable to 
attack. If more than one character is 
thè same, only thè furthest left 
character will be blown out of thè 
sky when you type it from thè 
keyboard. Each time you type thè 
character, it disintegrates. You do 
not have to aim. 

Type up a column, starting with 
thè one on thè left. When you ve 
almost destroyed every character in 
that column, thè remaining columns 
will start falling toward thè bottom 
of thè screen faster. Again type out 
thè letters that are closest to thè bot¬ 
tom of thè screen first. If any 
character touches thè bottom, thè 
attack is ended and you lose energy. 
However, wiping out an entire wave 
earns you a trophy. 

In thè Word Attack mode, groups 
of complete words fly across thè 
screen. They go off thè left edge of 
thè screen and reappear on thè other 


side. Only one can be destroyed at a 
time, and this target is indicated by 
a blinking shield below. You must 
type thè whole word and press thè 
spacebar or return key to wipe thè 
word off thè screen. 

Letters entered on thè keyboard 
are displayed below thè vulnerable 
word and move it. To correct typing 
errors, use thè left arrow key to 
move back one letter and thè return 
key to erase all letters entered. 

If you complete Word Attack, you 
will advance to thè next lesson and a 
new set of letters. If you eam your 
three Letter Attack trophies and 
blast all thè Word Attack words on 
their first pass, you can play Bonus 
Words. There are no penalties dur- 
ing this attack, only extra points. 

Each lesson begins with 100 units 
of energy. During Letter Attack, a 
typing error uses one unit of energy. 
Each wave to hit thè bottom of thè 
screen consumes 35 units. During 
Word Attack each letter in thè 
vulnerable word adds one energy 
unit if thè word is destroyed, or sub- 
tracts thè same number of units if 
thè word wraps around thè screen. 
No energy is lost in Bonus Words. 
The bar on thè right of thè screen 
shows how much energy is left. The 
game ends when there is no more 
energy. 

In Letter Attack, you eam five 
points for each letter destroyed, and 
you lose five points for each typing 
error. In Word Attack and Bonus 
Words, you eam 20 points per letter 
in each word destroyed. At thè end 
of each successfully completed 
lesson, you earn bonus points com- 
puted by multiplying your average 
words-per-minute for that lesson 
times thè speed you choose to play. 
If your score is high enough, you are 
allowed to enter your initials in thè 
Hall of Fame. 

This game has outstanding sound 
effects, music and graphics. Best of 
all, it teaches good typing at thè 
same time as being funi It is 
available from Sirius Software, 
10364 Rockingham Drive, Sacra¬ 
mento, CA 95827 for $39.95. ■ 

Kirk H. Lesser 
Hancock, NH 


Crush, Crumble 
and Chomp 

H ave you ever wondered how 
Godzilla or Mothra perceived 
its relationships with mankind as it 
tried to obliterate Tokyo, or why 
The Blob chased and consumed 
Steve McQueen’s friends? 

On-the-job training in Automated 
Simulationss Movie Monster Game, 
"Crush, Crumble and Chompl, can 
answer these and other bewildering 
questions. More than an adventure, 
this incursion into monsterdom re- 
veals how thè bigger half may have 
lived on thè Silver Screen. This may 
be a classic in Apple computer 
gaming. 

Slick packaging attracts atten- 
tion. The game comes boxed, with a 
Tyrannosaurus rex about to con¬ 
sume a mail truck depicted on thè 
cover. This much maligned creature 
towers above a fleeing populace, 
with three surrounding buildings 
facing imminent destruction by thè 
king of thè dinosaurs. (They happen 
to be none other than thè IRS, 
AT&T, and Postai Service build¬ 
ings—keep your cheers down to a 
dull roarl) 

This review is based on thè Apple 
disk version, which requires an Ap¬ 
ple II or Apple II Plus, 48K bytes, 
one disk drive and a 13-sector con¬ 
troller. There are also versions for 
thè TRS-80 Models I and III, and for 
thè Atari as well. Both thè Apple and 
TRS-80 versions are contained on a 
single disk, on different sides. A 
thick instructional booklet should be 
read immediately, and thè six statis¬ 
tica! cards put aside until needed. 
Loading instructions for both Sys¬ 
tems are found on a separate sheet 
inside thè box. 

The Manual of Monsterhood, 
though imposing, is one of thè most 
entertaining game tutorials ever 
written. Humorous and thorough 
explanations quickly guide you 
through thè material. You 11 soon re- 
alize that, through thè courtesy of 
Automated Simulations, you can 
wreak havoc on one of four popula- 
tion centers: New York City, thè 
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Jump 

8 

Fly 

40 

BreatheFire 

40 

Immolate 

5 

Stomp 

10 

Obliterate 

N/A 

Atomize 

30 

Descend 

20 

Paralyze 

10 

Ultra Scream 

30 

TailLash 

5 

Head Tilt/Turn 

STD 

Crumble 

15 

Grab 

10 

Eat 

N/A 

ZAP 

15 

Web 

N/A 

Regeneration (Healing) 

VerySlow 

20 

Slow 

50 

Fast 

100 

Very Fast 

N/A 

Strength 

Increase 

15 

Normal 

0 

Decrease 

«15 

(this is added to your CCs) 

Hide 

Soft (no hide) 

0 

Thin 

1 

Medium 

2 

Tough 

5 

Hard 

20 

Armor 

35 

Swim m in g 

20 

Contamination Trail 

30 

Fiery Trail 

50 


Table 1. 


San Francisco-Oakland Bay area, 
Washington DC or Tokyo. Helpful 
maps of each city, though aiterei! to 
fit thè game, are included to aid thè 
player in keeping track of monster 
location and intended targets during 
game play. 

Upon loading, versions for some 
computers will ask if thè player 
wishes sound to accompany play. 
The Apple version may only be 
played with sound intact. Disk ver¬ 
sions will then ask if thè player 
wishes to continue a previously 
saved game. Then, speed of play is 
chosen. This governs thè amount of 
time thè player is allotted to make 
those fateful decisions that affect thè 
monsters actions. Computer-con- 
trolled activities also fall within this 
player-determined game speed, such 
as thè arrivai and movement of pan- 
ic-stricken mobs, National Guard 
units and helicopter assaults. A nov- 


ice player would be wise to choose 
thè slowest mode of play possible. 

Participants with disk versions 
play thè game in one of two ways: 
They can control a Feature Crea¬ 
ture, one already programmed with 
certain abilities, or grow their own 
beastie from scratch. This latter 
option is one of thè best features of 
thè game. 

Cassette users need not be dis- 
heartened, however, for thè prede- 
termined colussi are, in themselves, 
awesome and playable. In fact, all 
players should start with one of thè 
predetermined monsters and learn 
thè game through a scenario, as sug- 
gested by thè tutorial author. 

To involve a Feature Creature, 
thè user enters an F. The screen 
clears to display thè following 
choices: 

1) GOSHILLA 

2) KRAKEN 

3) ARACHNIS 

4) THE GLOB 

5) MECHISMO 

6) MANTRA 

The player enters a number corre- 
sponding to his or her choice. One of 
thè six statistical cards details all of 
thè necessary commands for thè se- 
lected monster. 

The Manual of Monsterhood pre- 
sents four scenarios to assist thè play¬ 
er in learning thè game. Exciting 
play is captured in “It Carne From 
Beneath Its Budget” (where San 
Francisco Bay becomes thè play- 
ground of a Kraken, bent upon total 
destruction), “Goshilla vs. thè Smog 
Monster” (with Tokyo thè target, 
where Goshilla battles not only thè 
humans, but thè smog as well), 
H.G. Wells’ classic “War of thè 
Worlds” (in which Washington DC 
takes on Mechismo, a combat ma¬ 
chine that would tum C3PO rusty 
with envy), and lastly, ‘‘Breakfast at 
Tiffany’s” (which reveals thè good 
nature of a giant spider). 

Each of thè scenarios is great. 
Roughly 120 play combinations exist 
for cassette players, and over 160 are 
possible for those with disk capabili- 
ties. That should hold your interest. 

All commands for your creature 
consist of single key entries, in- 


cluding M(ove), J(ump), S(tomp), 
F(ly), B(reathe Fire), H(ead), 
I(mmolate), D(escend), G(rab), 
E(at), C(rumbìe), O(bliterate), 
T(ail or Tentacles), W(eb), 
P(aralyze), U(ltrasonic Scream), 
A(tomize), Z(ap), and even 
N(othing), which is handy while 
awaiting thè arrivai of a meal. 

The Feature Creatures have thè 
powers as identified on their statistical 
cards. Other gifts some possess are: 

• Fiery Trail—no matter where 
your creature walks, it leaves behind 
a trail of fire., This causes thè igni- 
tion, depending upon wind direc¬ 
tion, of units and/or buildings. Best 
of all, this blazing barrier also sty- 
mies pursuit. 

• Radioactive Contamination—a 
trail of radioactive waste is left in thè 
monsters wake, which is impossible 
for units to pass through. 

• Swim—self-explanatory. 

For those with disk drives, thè 
ability to create a monster starts 
with your being informed of thè 
number of Crunch Qredits available 
to a specific body type: 

1) BIPED 

2) SEA MONSTER 

3) INSECT 

4) AMORPHOUS 

5) ROBOT 

6) FLYER 

7) BRONTOSAUR 

8) SERPENT 

The Manual of Monsterhood indi- 
cates how many Crunch Credits 
each specific “talent” will cost in thè 
development of thè specific type. 
For example, a robot, which cannot 
get hungry, would begin with 120 
credits. The cost of each special 
quality or ability is listed in Table 1. 

For your creature to obtain all of 
these occupational specialties would 
cost you more CCs than can be 
drawn upon. The player must make 
a decision on desirable characteris- 
tics for thè creation. My own robot, 
Ghastblud, delighted in having 
Fiery Trail, hard hide, slow healing, 
Zap, Immolate, Grab, and normal 
strength. He did quite well. 

In addition to moulding your cre¬ 
ation, you must also decide upon an 
objective for thè beastie. There are 
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FREE! j 

Brand New Catalog \ / 
With Over 150 Programs 


Best 

Software 
Under The 
Sun 


Instant Software’s new catalog is free and it offers 150 of thè finest 
programs you can find. At reasonable prices. . and a variety 
you’ve never seen before in one catalog. And they’re all contained in 
thè new 16 page 1983 Instant Software catalog. You’ll find: 


ASSEM/ZSIM —2 great Utilities in 
one super package. Assembly lan- 
guage programmers, this package 
solves all your programming prob- 
lems from ASSEM to ZSIM. 

Super Utility Plus —thè most 
powerful program of its kind. A 
must for every serious TRS-80* disk 
installation. 

Geography Explorer Series —thè ex- 
citing, attention-holding series that 
teaches your children essential geo- 
graphical facts. 

Phaser Blast —phaser-armed 
robots, enemy Hovertanks. .. pre¬ 
pare for a journey into thè war of 
thè future. 

Space Shuttle —experience thè ulti¬ 
mate flight as you pilot America’s 



Columbia through launch, orbit, 
re-entry and landing. 

Plus dozens of other practical, 
mind-boggling or spine-tingling 
programs. 

And now you can get thè new 1983 
Instant Software Catalog absolutely 
free. You don’t even have to pay for 
thè phone cali. Just diai toll free: 


1 - 800 - 258-5473 

and ask for your free copy of Instant 
Software’s 1983 Catalog. 

It could be thè smartest cali you’ll 
make all year. 


Instant Software. The best software 
under thè sun. 


\\ 





. 




Instant Software 

(a subsidiary of Wayne Green Ine.) Route 101 & Elm St. Peterborough, NH 03458 


‘TRS-80 is a registered trademark of thè Radio Shack division of Tandy Corp. 


Yes, I want a free catalog! 

Name 



Please send my free copy to: 

Address 



Instant Software 

Citv 

State 

Zip 


I have a 


Jr 

_computer 

The best software under thè sun. 
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NC-025 J 
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five possible missions to select from: 

• Balanced—where your monster 
obtains points for doing just about 
everything. 

• Killer Monster—with human 
units as your number one target. 

• Combat Machine—where battle 
against human units scores thè most 
points. 

• Destruction—where edifices and 
bridges are your targets. 

• Survival—wherein evasion and 
escape eam you thè most points. 

The varieties are endless. One 
could elect to own a flying robot, a 
swimming blob, or perhaps a fire- 
breathing spider. The final selection 
involves choosing thè relative 
strength or weakness of his or her 
creation. 

After entering all of this required 
information, thè screen announces, 
in marquee fashion, that thè player 


has a starring role in thè feature 
movie about to be shown. Co-star- 
ring are thè National Guard units, 
tanks, artillery, police and panic- 
stricken mobs. Examples of terrain 
features are also presented. 

The adventure starting areas for 
either land- or sea-based creatures 
are drawn on thè screen. Nine im- 
portant areas for thè operation of 
your beastie are also displayed on 
thè right side of your monitor. This 
lists in detail thè current wind direc¬ 
tion for each turn—invaluable in¬ 
formation to those fire-breathers 
who stalk thè screen. 

Also revealed are your monster’s 
Health (which ranges from healthy 
to criticai), thè direction in which 
your beastie is headed, whether thè 
thing is hungry or not, whether 
there is a tasty morsel in one’s paw, 
thè head tilt and angle, and last, 
whether thè monster is awaiting a 


command from its trainer. 

The Manual of Monsterhood will 
be a Constant reference source; it 
contains some little pieces of advice 
no monster maker should be with- 
out. The authors have done a 
superb job with Crush, Crumble 
and Chomp. The game is recom- 
mended, due to its countless possi¬ 
ble scenarios, enjoyability factors, 
and thè thrill of finally seeing your 
favorite city demolished beneath 
your feet. A fun game for all those 
50s matinee goers who remémber 
thè thrill of watching a young Ray¬ 
mond Burr flee thè onslaught of thè 
first Godzillal Now, thè shoe is on 
thè other foot. 

The package is available from 
Automated Simulations, 1988 
Leghom St., Mountain View, CA, 
for $29.95. ■ 

Hartley G. Lesser 
inCider staff 
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FRICTION FEED FOR YOUR EPSON 

MX-70' m MX-80 

* MX-70 and MX-80 are Trademarks of EPSON. Ine. 

• Converts your printer for friction 
feed of SINGLE SHEETS or ROLL 
PAPER. 

• SIMPLE Installation (all you need 
is a screwdriver, no soldering). 

• Tractor feed remains 
undisturbed. 

. Only S 39 95 

(add $2.00 for shopping) 

SATISF ACTION GUARANTEED OR YOUR MONEY BACK 

MICROGRIP 
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San Bernardino, CA 92404 
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Epson, OKI, IDS, & Star Printers 



ACOUSTIC ENCLOSURES 

Reduces Noise Up to 90% 


e Heavy Duty Acrylic Cover 



e Bottom Feed Capability 
• Choice of oak or walnut 

Micro Printercenter" 


Ordering or Dealer Info 
800-343-4311 

Master C barge and Visa Accepted 


CAB-TEK, Ine. 

Riverside SI, Nashua, NH 03062 

CIVILIZING PRINTERS 


MPC I $99 (MX 80) MFC II $129 (OKI82) 
MCPIV $179 (83A t MX 100) MCP IV $199 (IDS) 
MPC II Shown 
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Seafox 


S eafox, recently released by Bro- 
derbund Software, leaves me 
with mixed feelings. On thè one 
hand it has that special quality that 
makes a good game: When you fin¬ 
ish playing, you want to play it 
again. On thè other hand there are 
several things I don’t like about it, 
and FU explain those later. 

Seafox is a standard submarine 
chase game in which you are given 
various missions to accomplish. 
Each mission consists of destroying a 
row of merchant ships moving acro ss 
thè top of thè screen. Five levels of 
play, each more difficult than thè 
one before, challenge thè player. 

Life is made difficult for you in 
several ways. First of all, you must 
avoid other submarines patrolling 
thè waters. In thè earlier missions 
you only have to avoid contact with 
them. Starting with your third mis¬ 
sion they fire torpedoes, which you 
have to dodge. 

You have two ways to destroy 
your enemy. You can fire torpedoes 
head on (right to left on thè screen) 
at other submarines, or up towards 
submarines or ships on thè surface. 
Certain obstacles prevent you from 
just firing at them any time you 
wish. Hospital ships float along un- 
demeath thè merchant ships that are 
your main targets. This makes it 
hard to hit thè merchant ships every 
time. If you accidentally shoot a hos¬ 
pital ship, your torpedo will be de- 
flected down into thè water until it 
collides with some object or thè 
ocean bottom. You can’t fire up 
again until your torpedo explodes or 
hits bottom. 

Two things to watch out for are 
fuel and torpedoes remaining. For- 
tunately, a supply sub comes along 
thè ocean bottom occasionally and 
releases a trained dolphin carrying 
fuel and torpedoes. You must inter- 
cept thè supply pack before a giant 
clam comes along and gets it. Don’t 
hurt thè dolphin—thè results will be 
fatai. 


Starting with thè second mission, 
destroyers join thè hospital ships 
above thè water and start dropping 
depth charges. This makes things a 
bit more hazardous, but thè depth 
charges destroy anything they hit— 
including enemy submarines. 

By implementing what you have 
learned up to this point, you might 
be able to survive thè magnetic 
mines that replace thè enemy 
torpedoes on thè fourth mission. I 
have not made it past this level, but I 
assume that you have to survive both 
mines and torpedoes on thè fifth 
mission. 

The demo mode indicates that 
magnetic mines will be introduced 
in either thè fourth or fifth mission. 

All things considered, this is a 
good game but, as I said earlier, it 
has some weak spots. By thè third 
mission thè animation slows down 


quite a bit; it’s adequate, but thè de- 
lay detracts from thè game. 

The packaging claims that you 
can use keyboard, joystick or paddle 
control. I find a joystick thè only ac- 
ceptable controller. I don’t like to 
use thè keyboard in a fast-action 
game that requires you to manipu- 
late 11 keys. The alternative of using 
thè two paddles to control thè hori- 
zontal and vertical movements si- 
multaneously is cumbersome for 
most people, especially young peo- 
ple with small hands. 

Seafox is written in machine lan- 
guage and runs on an Apple II with 
48K RAM, II Plus and a 13 or 16 sec- 
tor controller. It comes, for $29.95, 
from Broderbund Software, 1938 
Fourth St., San Rafael, CA 
94901. ■ 

Jim Eatherly 
Washington, DC 
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APPLEDEXTEROUS* 



* The ability of an Apple II® computer to perform more than one function 
concurrently when using thè BREM-239D buffered serial interface. With an 
Appledexterous Apple, it is possible to print, compute or write to disk without 
interrupting or losing incoming data. In thè output mode, thè 239D spools data 
either to die on board printer port or thè serial output charme!. The 
BREM-239D is plug compatible with popular serial boards, is easily installed 
and costs only $299.00. What this means is a lot more juice from your Apple. 

TO ORDER OR FOR FURTHER INFORMATION, CALL (714) 739-5020 
BREM ENTERPRISES 15201 Santa Gertrudes Ave. #Y-102 La Mirada, Ca. 90638 
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Bent on Business 

by Gregory R. Gian 


Graphs Make thè Point 


I nformation. In business—any 
business—it’s thè name of thè 
game. What information you have, 
and what use you make of it, is rela¬ 
tive to your own business, of course. 
But no one can operate today with- 
out effective use of information gen- 
erated by thè actual performance of 
thè business. 

What’s selling? What’s not? 
Who’s working efficiently? Who’s 
not? Is our advertising effective? Are 
we spending too much on auto costs? 
Insurance? Accounting? And, thè 
bottom line of all this: Where are all 
our dollars going? 

Lately, more and more use is be- 
ing made of business graphics, 
where you’re given a “picture” of fi- 
nancial information, rather than 
just thè numerical data itself. 

These business snapshots are rap- 
idly filtering down to microcom¬ 
puter users; today, anyone with an 
Apple II and a graphics printer can 
buy a software package or two and 
create informative, helpful business 
pictures. And, after all, many things 
are simply more effective when you 
see thè relationship between them. 
Rows and columns of numbers are 
necessary, but often don’t teli you 
a lot. 

For instance, when someone re- 
ports that sales for thè first six 
months of 1981 were $169,000, and 
for thè same period in 1982 they ran 


$142,000, you can understand and 
assimilate that information. How- 
ever, if someone gives you a list like 
thè one in Table 1, you’ll have a 
hard time really understanding it. 

I suspect that you’d do thè same 
thing I would with this list—sit 
down and add up thè columns. And 
if they were already totaled, they d 
stili give little more information 
than thè originai statement about 
last year’s sales. 

So thè logicai thing is to create a 
graph of thè data. While many busi- 
nessmen don’t have thè time to sit 
down with pencil, ruler and graph 
paper to chart their own business in¬ 
formation, with their Apple they 
can do it easily and quickly. 

In a future column, we’ll examine 
what graphics packages are avail- 
able, how easy they are to use, and 
how to get hard copies of your busi¬ 
ness pictures. But today I want to 
suggest a couple of uses for your own 
business graphics—one to do with 
sales, and thè other to do with costs. 

Graphing Your Data 

Remember, in graphing business 
data you’re looking for thè visual re¬ 
lationship between thè numbers; 
you want to see how thè figures re¬ 
late to one another. This means you 
don’t have to be able to look at a 
point plotted on a graph and say, 
“Ah, sales for March were $27,823.” 


If you scaled a graph so you could 
read thè exact figure, it’d be too 
large to teli you anything. You can 
always go to thè printed list to 
get thè precise dollar figure if you 
need it. 

The point is, of course, that you’re 
looking at a picture of thè data, 
rather than thè numbers, and this 
snapshot will help you better under¬ 
stand thè information. 

Case in point: We operate a heat- 
ing and air conditioning business, 
and one large monthly expense is 
gasoline for our Service trucks. The 
figures for 1981’s gas costs, and for 
thè first eight months of 1982, ap- 
pear in Table 2. 

Now, while all these numbers are 
nice and correct, atid while you can 
see that 1982*s gasoline costs are gen- 
erally lower than 1981’s, isn’t a 
graph of that same information 
(Figure 1) more effective? 

A Red Flag 

Using this simple line graph, you 
can get a pretty good idea of thè ac- 



1981 

1982 

Jan 

798 

884 

Feb 

824 

509 

Mar 

754 

437 

Apr 

949 

438 

May 

997 

314 

Jun 

998 

453 

Jul 

983 

532 

Aug 

1022 

657 

Sep 

999 

— 

Oct 

939 

— 

Nov 

892 

— 

Dee 

859 

— 


Table 2. Gasoline costs in thè author’s 
business. 


Address correspondence to Gregory Gian , PO 
Box 1627, Prescott , AZ 86302. 



Sales 1981 

Sales 1982 

Jan 

25,037 

18,921 

Feb 

35,500 

26,455 

Mar 

27,823 

15,770 

Apr 

37,287 

30,579 

May 

30,428 

24,304 

Jun 

40,498 

26,389 


Table 1. Sample business data. 
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CRfìCK-SHOT 

★ CflftCK-SHOT is eosy to use 

Designed for fìmoteur and Professional 

★ fiutomotic 8-fìle moker 

8-file con run on another fiPPlC 
uiithout thè cord instolled. 

B-file moy be copied COPV fi 
B-file moy be sent over Modems 

★ Fantastic Utilities 

★ Huge Documentotion 

★ HOT-UN6 24 hours/day 7 doys/uieek 
for any System upgrodes thru 
PIRfiTCS HfifiBOfì 

(Over 1000 Users Now) $15.00 €xtro 

★ Greot Product Support 

★ CRfìCK-SHOT hardware contoins 8 chips 
& 2 suuitches including €-prom and odd on 
memory. Use in ony slot other thon 6. 

For MasterCard or Viso Only 
Cali Noto! TOIL FR€€ 
1-800-824-7888 

fìsk for Operotor 68 

m cr 1-800-852-7777 

fìsk for Operotor 68 


CRACK-SHOT 





TH€ UlTIMfìTC IN COPV D6-PROT6CTION 

Not just another bit copier. 

Glotus Locksmith and Nibbles fluiay — flUIflV 

€ven cracks all bit copiers in fifteen seconds 

CfìfìCK-SHOT is a harduuare devicc tìiat fìts right in on Apple Slot and 
dumps all memory to disk 

★ Use os o goming tool to stop, stort ond sove o gonne at ony leve! 

★ Full monitor copobilities to examine. modify, trace single-step. or dis- 
ossemble on intemjpted program 

★ Copies from DOS 3.2 to DOS 3.3 

★ Poster ond eosier to use thon ony bit copier 

★ lets you suspend uxxk uuith one program uihHe you use another 

★ Crocte single disk occess programs in fifteen seconds. longer for muftt-occess 

System Aequirvmwts: 48K fippie II orfìpple II Plus 
1 Disk Drive 

ftameard helpful but not required 

Complete ujith Software ond Instructions.$149.95 

Cosh. Check Money Order, MasterCard of Viso occepted 
Order nouu from: 

* PIRRTCS HRRBOR « 

PO. Box 8928. Boston. Mfl 02114 617/736-5051 MO06M X 

Apple s o registnred trademark of Apple Computer. Pirates Hoibor is thè Trademofk of (he Aed Aebel 
loctemltb—bodemoih of Omega Mkrouioie, Ine Nibbles Auioy—bodemoih af Computer: oppKcodons 


Crack-shot has been deslgned to be used as a gaming tool, programmerà aid, and as a device to 
assist you in legai archivai copies of your programs. 

Crack-shot should not be used for illegal purposes. 
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Sent on Business 



tual monthly costs, see how one year 
relates to thè other, and also note 
any trend in thè data. I stopped thè 
data with August 1982, so you could 
see what we discovered when we 
charted this graph for our business. 
While thè costs were stili way under 
198rs gas expenses, thè trend, run- 
ning from May through August, was 
up —a disturbing factor. This re- 
versed an earlier trend, where our 
cost-cutting program was decreas- 
ing gasoline costs. 

Once you see a trend line like this 
one, you bave thè opportunity to 
correct thè problem before it bai- 
loons into a major difficulty and 
puts a big dent in your cash position. 
What made gasoline costs rise? Were 
thè Service people taking thè trucks 
home at night when they weren’t 
supposed to? Were major truck re- 
pairs made during this period? 

A graph like this gets you to think- 
ing about what’s happening in your 
business, and if there are some prob- 
lems—which there definitely had to 
be with these gasoline costs—it gives 
you a chance to correct them. 

The first thing I heard when I put 
out a copy of this graph for thè em- 
ployees to see was, “Well, our sales 
must have been really up, too, and 
that's why we used more gasoline.” 

Valid suggestion. Unfortunately, 
thè program I used to create Figure 
1 can’t handle two different scales 
on thè same graph. For instance, it 
wont let you put one graph line in 
increments of 10,000 (which we 
would need for sales), and another 
line in increments of 100 (which 
would handle thè gasoline costs). 


So, thè next graph isn’t quite as 
nice; it’s my own, and doesn’t have 
all thè months and amounts listed 
(I’m not a fancy programmer). But 
this plain-Jane graph illustrates that 
you don’t need all thè names and 
numbers to understand what thè 
graph says. 

Look at Figure 2. The hash marks 
running across thè bottoni indicate 
months, starting withjanuary, then 
February, and so on, ending with 
August. 

The hash marks running up and 
down thè sides of thè graph actually 
represent two scales. For thè solid 
line, each mark represents $10,000 
in sales. On thè graph itself, thè solid 
line is for sales. Since each hash 
mark indicates $10,000 in sales, thè 
first plot of thè solid line indicates 
we sold about $20,000 worth of fur- 
naces and such during January. 

For thè dotted line, each hash 
mark indicates $100 in gasoline 
costs. The first plot on thè dotted 
line is for January, and indicates 
January’s gas costs were about $900. 

Remember, thè vital thing is thè 
visual relationship between thè 
numbers. So omitting thè month 
names and thè scale up and down 
thè sides of thè graph shouldn’t hurt 
you in getting this graph’s particular 
message—that for thè June through 
August period, gas costs were rising 
much faster than sales. 

In contrast to that, early in thè 
year, as sales declined, so did gaso¬ 
line expenses. They went down dur¬ 
ing thè February-March period; so 
did sales. They decreased in thè 
April-May period; so did sales. 
Then, sales and gas costs both start- 
ed rising—but gasoline costs went 
up much faster. 

And that’s thè beauty of a graph: 
you can see that one line is increas- 
ing faster than thè other. This meant 
we were spending more money per 
sale for gasoline than we had been, 
and this, coupled with thè reversai 
of thè early-year decline in gas costs, 
indicated we had a problem. 

Simplify thè Stats 

Now that we’ve compared gas 
costs from 1981 to gas costs for 1982, 



J_I_I_I_I-L 


Figure 2. Plain-Jane graph of sales and 
gasoline costs. 
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DOLLARS 


Figure 3. Bar graph shows all too clear- 
ly how costs have increased. 


and done a gasoline cost versus sales 
comparison, what about just thè gas 
figure itself? 

Usually, thè best way to show a 
single item is to use a bar graph; this 
makes thè numbers easy to see and 
comprehend. Figure 3 shows a bar 
graph, but this one starts in March 
1982, and runs through August 
1982—to demonstrate how costs 
were increasing. 

It’s obvious to anyone looking at 
Figure 3 that gasoline costs over thè 
past few months went up. While it 
doesnt indicate how thè/re doing 
compared to another year s costs (as 
Figure 1 does), and doesn’t display 
their relationship to another current 
dollar figure (as Figure 2 shows), it 
clearly demonstrates where thè gas¬ 
oline costs are moving. 

The second thing I want to exam- 
ine this month also uses my “plain- 
Jane” graph, because I want to look 
at two things with widely different 
scales. I want to chart sales, which 
has monthly increments of $10,000, 
along with advertising, which has 
an increment scale of $100. 

As you re looking at Figure 4, re- 
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Optmuzed 


|PT~TM 


INTRODICTORY PRItfc 

SEND FOR FREE BROCHURE - TODAY! ^ 

DECISION ECONOMICA INC. 

14 OLD FARM ROAD, CEDAR KNOLLS, NEW JERSEY 07927 

APPLE IS A REGISTERED TRADEMARK Of THE APPLE CORPORATION 


$T0CKtRAFT 


wabasli 

When it comes to 
Flexible Disks, nobody 
does it better than 
Wabash. 

MasterCard, Visa Accepted. 
Cali Free: (800)235-4137 


PACIFIC 

EXCHANGES 

100 Foothill Blvd 
San Luis Obispo CA 
93401 (In Cai cali 
(805) 543-1037 ) 



Dot Matrix Printer Interfaces with Apple il 

Featuring an Apple ll®-compatible parallel 
interface, Addmaster Corporation has produced 
a new dot matrix printer, Model 170. The inter¬ 
face includes a Centronics-type handshake and 
DB-25 interface connector, Baudot, and day — 
and time clock. The Model 170 provides 18 or 
21 characters per line, 6 lines per inch print 
density, on standard 2V2” adding machine tape. 
Designed to use with personal computers, 
Model 170 will produce hard and carbonless 
copies of programs, data or results. Write 
Addmaster Corporation, 416 Junipero Serra Dr., 
San Gabriel, CA 91776 or cali 213/285-1121. 
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Subscription 

Problem? 


inCider does not keep subscription 
records on thè premises, therefore calling 
us only adds time and doesn’t solve thè 
problem. 

Please send a description of thè problem. 
and your most recent address label to: ^ 


fcider 

Subscription Dept. 
PO Box 911 

Farmingdale, NY 11737 


Thank you and enjoy your subscription 


/ Epson *0 
° Giveaway " 

Epson MX70/80 Cartridges 

^COOEACH 

Min. 3c 


m Min. 3 of same color 

Reloads $2.50 each Min. 12 
$30.00 a Doz. of Same Color 

Cartridges and Reloads Available 
In Black, Red, Green, Blue, Brown 

q^s^isrns 

Dept. 14A. 35 Cherry Court 
East Northport. N.Y. 11731 

N.Y.S. Residents Add Tax. Add $2.00 Shipping & Handling 
Prices Subject to Change 
Allow Clearing Time for Personal Checks 
Money Orders & Certified Checks shipped same day 


Improve Your 
Programs on 
thè APPLE II 


Your favorite routines belong with thè most 
efficient "power-boost" possible for thè II 
Il +. THE ASSEMBLER DEVELOPMENT SYS¬ 
TEM provides thè c leanest path to interface 
thè powerful 6809 with DOS. 



The Lobero Building PO. Box 2T42 
Santa Barbara, Ca. 93120 
(80S) 966-1140 Telex 658439 
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BEEP! LOST YOUR PROGRAM? 


BUS RIDER 

LOGIC ANALYZER FOR THE APPLE II 

The Bus Rider is a self diagnostic development tool that allows reai time 
analysis of software and hardware in thè Apple 11 computer. 

The Bus Rider provides: 

• Monitors and saves 51 2 cycles of thè address and data bus, NMI, IRQ, 
DMA, R/W and 4 external lines. 

• Pretrigger viewing of up to 51 2 samples. 

• 4 external inputs with variable threshold reference. 

• Display cycle by cycle execution or 6502 disassembled code. 

The Bus Ridercomes completewith Bus Ridercircuitcard,referencemanual, 
Bus Rider software diskette, and 10 easy hook external input cable. 

The total System price is $395.00 
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Bus Rider - Disassembled Display 

RC Electronics Ine. 

5386 Hoilister Avenue. #D 
Santa Barbara, CA 93111 
(805) 968-6614 
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Figure 4. Sales and advertising costs. 
Both sets of data are plotted on thè 
some line, a method that fails to reveal 
a correlation. 


member that each little hash mark 
up and down thè sides of thè graph 
indicates $10,000 for thè solid line 
(sales), and $100 for thè dotted line 
(advertising). 

Again, you can get approximate 
amounts from thè graph—sales for 
January 1981 were about $25,000, 
while advertising for January was 
just about zero. 


This graph doesn’t teli me a whole 
lot. Correlation between thè two 
lines is not significant. 


Plot Strategy 

January’s advertising and Janu¬ 
ary’s sales are plotted on thè same 
line, but perhaps it would make 
more sense to lag sales behind adver¬ 
tising. Wouldn’t January’s advertis¬ 
ing have an effect on February’s 
sales? Wouldn’t thè advertising we 
do in May have a significant effect 
on June’s sales? 

Advertising people feel today’s 
advertising produces tomorrow’s 
sales. Thus, to get an accurate pie- 
ture, you’d need to lag sales figures a 
month. January’s advertising and 
February’s sales should be plotted on 
thè same line. Same with February’s 
advertising and March sales, March 



Figure 5. Sales and advertising costs, 
plotted with a one-month lag to show 
their relationship. 


advertising and Aprii sales, and so 
on, all thè way across. 

Figure 5 does just that. The first 
plots are for January’s advertising 
(dotted line) and February’s sales 
(solid line). 

As you go along this graph, you 
can see a definite relationship be¬ 
tween last month’s advertising and 
today’s sales. Not all plots correlate 
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PROTECT YOUR APPLE* KEYBOARD 


PLEXA-LOK 


PROTECT YOUR EXPENSIVE INVESTMENT 

OFFERED FOR THE FIRST TIME PLEXA-LOK COMES WITH A 
30-DAY MONEY BACK GUARANTEE IF NOT SATISFIED! 
PLEXA-LOK slips up and over thè keyboard - 
then gently snaps into position. 

• Your valuable computer is protected from objects and spills directly on top of keyboard 
which could cost hundreds of dollars to repair! 

• PLEXA-LOK allows your secretary to go on break without having to worry about visitors 
accidentali destroying their hours (and your $) of work. 


> ENHANCES looks of 
your System 


- PROTECTS keyboard 
from dust 


- ALLOWS computer to 
remain on while unattended 



* TM APPLE COMPUTER Ine 


MON -FRI 9:00-5:00 

H 5 

MasterCard and Visa Accepted 

Allow 4-6 Weeks 
Delivery 

Dealer Inquiries Welcome 



LAST ELECTRONICS 
P O BOX 1300S 
SAN ANDREAS, CA 95249 
(209) 754-1800 


INTRODUCTORY SPECIAL 

APPLE II $19.95 

APPLE III $24.95 

FROSTY 

APPLE 1.50 extra 

Prepaid UPS 
Continental USA 
CA Residents Add 6% Tax 
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APPLE-COMPATIBLE 
MINIFLOPPy SYSTEMS 
for your APPLE II 

Disk Drive*.$279 

Interface Card*... $99 

* These ore Apple-comporible disk dnves ond mrerfoce cords ond ore 
plug-comporibleond idenncol in funcrion ro Apple II equipmenr. Swirch 
selecroble 13 or 16 secror boor 

DISK DRIVE CABLE $29.95 

Free With Purchase of Drive 

There is o 15 DAY FREE TRIAL ON DRIVES Warranry 120 days 
Add $4.00 per drive for shipping in Conr. US. UPS COD charge 
$1.50. 

Apple II is o rrademark of Apple Compurer Ine 

ORDER NOW! 

Wrire or coll. Toll free lines ore for ORDERS ONLY> If you need rechmcal 
informonon or Service coll 214/337-4346 We occepr VIStyMASTERCARD ond 
COD orders by phone COD orders will be cash, cerrified cheds or money order 
only. If you order by mail ollow 2 weeks for personal chedss ro cleor. Texas 
residenrs odd 5% rox All srock irems ore shipped wirhm 24 hours. We do nor 
charge your credìr cord unril rhe day we ship. 

CALL TOLL FREE 

(800) 824-7888, Operator 24 

California dici (800) 852-7777, Opererà 24 Alaska 6 Hawaii dial (800) 824-7919, 
Opererà 24 TOLL FREE UNES FOR ORDERS ONLY. 

Technical informarion & service coll (214) 337 4346 

AETCCCmP 

Redbird Airport, Bldg. 8 
P.O. Box 24829 
Dallas, TX 75224 


140 Èider February 1983 



















February 1983 èider 141 


Circle 229 on Reader Service card. 


Circle 11 on Reader Service card. 


t 


m 


ecial Offer 


PROGRAM EDTT1NG 


VI9CALC 

thè REPEATERRRR ™ 

WITH 

AUTO REPEAT & 
HIGH SPEED CURSOR 

"The best Apple II keyboard 
enhancement for thè money." 
"Excellent documentation, 
very easy to Instali." 

"LLLLove your Repeaterrrrl" 

Apple II 

keyboard adapter 

Repeats any keypress, including 
control characters for rubout, scrofling, 
etc. Featured on professionaf termi- 
nals. On/off control and adjustable 
delay to match your typing touch. 


uig 




TWO SPEED REPEAT, keyboard select- 
able. The best part. Touch Apple's 
repeat key to DOUBLÉ thè repeat rate. 
Great for long cursor moves. Zip 
through text, program, or across a 
VisiCalc spreadsheet to get there 
FAST. A must for 80 column displays. 

easy Installatimi 

Remove Apple top and plug on to 
25-pin connector between keyboard 
and encoder board (Rev. 7 or later). 
Compatible with all software, hard¬ 
ware, and Apple warranty. 

no rlsk—30-day trial 

Check, MasterCard, VISA (incl. card 
no. and exp. date). Prompt shipments. 
Full refund within 30 days. 

only *24.95 each 

Add $2.00 per order shippinq/handfing (S5.00 
foreign). Ohio orders add $ 1.63 per unit sales tax. 
Dealer inquiries invrted. 


HighOrderMicroEijectronics 

17 RIVER ST. CHAGRIN FALLS OH 44022 
PHONE 216-247-3110 

APPLE IS A TRADEMARK OF APPLE COMPUTER, INC. 
VISICALC IS A TRADEMARK OF VISICORP. 


(there d be something wrong if they 
did), but enough do to convince me 
there s a strong relationship between 
advertising and sales. 

Is your business thè same? Do 
sales run two months behind adver¬ 
tising? Can you use today’s advertis¬ 
ing dollar to predict sales? 

And here’s another plus that 
graphics will give your business: It 
lets you play with thè figures. You 
may already do this with VisiCalc, 
but thè graphs let you play with pic- 
tures rather than numbers. 


“Can you use today’s 
advertising dollar 
to predict sales?” 


By thè way, after showing thè gas¬ 
oline graphs to our people, our gas 
costs for September 1982 dropped to 
$513—down 23% ! 

Notes to thè Reader 

Just as a matter of information, 
thè bar graph and fancy line graph 
were produced using Hi-Res Graph 
Fit ($28, by Micro-Ware Distribut- 
ing, PO Box 113, Pompton Plains, 
NJ 07444). These graphs were all 
printed on an Epson MX-80 F/T 
printer, using Graftrix ($65, byData 
Transforms, 906 East Fifth Ave., 
Denver, CO 80218) to produce thè 
hard copies. 

Finally, since this is my first busi¬ 
ness column for inCider , I want to 
include a personal note. As much as 
I love writing, and as enthusiastic as 
I am about my two Apples (one at 
work, one at home), none of this is 
worth a plugged nickel unless it is of 
some help to you. I pian to cover 
both off-the-shelf software and 
home-grown programs for all types 
of business applications. PII stress 
thè big picture —what will help your 
business, how it will help and how to 
use it. Let me know what you like 
and dislike, and what you want to 
find out about. I need your help and 
comments and—believe it or 
not—FU answer every letter! ■ 
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Data 

S\ sti'ms, Ine. 


_ A 

MICROPRISM™ 

* SinglePassCorrespondenceQuality 

► Dual Speed: 75 + 110 cps 

► High Density Graphics 84 x 84 dPI 

► Proportional Spacing 

• Centronics Parallel 
& RS232 List 
Interfaces $7991 


Special 

$559.95 


Prism 80 4/color $1274.95 
Prism 132 4/color $1574.95 


f Okidata 

80 *334*» 

82A s 424 95 

83A s 664 98 

84 s 994 95 

84 RS232 *1114 95 

Epson 

MX 80 S 449 9S 

MX 80 F/T s 489 95 

MX 100 s 679 99 

Cltoh 

Prowriter s 469 99 

Prowriter 2 s 669 95 

FIO 40cps 1389 95 

FIO 55cps *1689" 

Diablo 

620 25cps *1169 98 

630 40cps s 1959* 5 

630 KSR *2495" 

Daisywriter 

2000 48k *1024" 

NEC 

pc 8023A s 499 98 

3510 *1575" 

3530 *1695 95 

3550 s 2095 95 

7710 s 2295 95 

7730 s 2295 9s 

Smith Corona 
TP-1 s 579 95 

Franklin Computer 
ACE 100, 64K RAM, 
Disk Drive/cont., 
Word Processing 

*1269" 

Corona 

5mb Hard s 1775 95 

lOmb Hard s 2085 98 

Microsoft 

Softcard Premium 
Pkg. s 479 95 

280 Softcard *239 98 
16KRAM * 89 95 
Multi Pian *225 95 

Time Manager s 115°° 

Microfazers 
8K *144 95 

16K s 164 95 

32 K *184 95 

64 K S 219 9S 


Amdek \ 

300G *159 95 

Color 1 s 339 95 

Color 2 s 749 95 

Color 3 S 459 9S 

Videx 

Video Term S 234 9S 

Enhancer II *109 95 

Hayes 

300 baud *219 95 

1200 baud s 539 9s 

Micromodem ll s 279 99 

Novation 

Apple Cat II S 309 9S 

212 Apple Cat 
Sys. s 569 95 

212 Apple Cat 
Upgrade *319 95 

Mountain Computer 

CPS Multi- 
function S 159 9S 
AD/DA s 289 95 

Ramplus 16K s 149 95 
Ramplus 32K *179 98 
Romplus + s 129 95 

Romwriter s 144 98 
Supertalker s 169 98 
100,000 Clock S 249 9S 

Saturo Systems 

32K RAM s 194 95 
64K RAM s 338 95 
128K RAM s 484 95 

Rana Systems 

Elite 1 Drive s 299 98 
Elite II Drive s 499 98 
Controller s 99 98 

Practical 

16K Micro¬ 
buffer s 204 95 

32K Micro¬ 
buffer s 234 95 

Electrhome 
1RGB s 309 98 

2 HI-RES s 559 98 

Interfaces 

Grappler + s 139 98 

Parallel Card 
& Cable s 82 99 

Dumpling GX *119 95 
Serial Card s 99 99 
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outCider 

by Paul Raymer 


The Rebel 

I get a great deal of mail from folks 
in parts of thè country where 
English is not spoken correctly, as 
we speak it here in Nevada. 

Most of thè folks are nice, consid- 
ering that they are Apple computer 
owners, and seem friendly enough 
in their letters—but periodically 
Fve had trouble figuring out what 
they mean. 

After a great deal of research at 
thè Clark County Language Re¬ 
search Center and Casino, and with 
thè help of my dear friend Trixie, 
who is both a research librarian and 
dyed-in-the-nylon Southern belle, I 
developed thè Rebel program (see 
Listing 1). 

Using thè algorithm developed by 
General Sherman when he visited 
thè lovely state of Georgia in thè 
1800s, and which was further devel¬ 
oped by U.S. Grant’s dose business 
relationship with Robert E. Lee, this 
program will certainly continue to 
improve relations between thè 
southern States and thè rest of us in a 
similar manner. 

The program easily translates reg- 
ular English words into thè phonetic 
representations one must assume 
southerners use when they talk. I 
don’t know. I never actually met 
anyone from thè South, unless you 
count Texas. 

It must be clearly understood that 
this program is neither complete nor 
100% accurate, but is meant as a 
starting point from which meaning- 
ful things can be done between thè 
two groups. 

I have read certain phrases in 
books about thè South that are not 
incorporated into thè program since 
they apparently have a hostile 
meaning in certain contexts. 

Comments concerning thè pro¬ 
gram are welcome. Additional vo- 
cabulary entries should be sent di- 
rectly to thè editors; money may be 


Paul Raymer (3464 Townhouse Drive, Las 
Vegas, NV 89121) is a former rancher, known 
for his short-homs, noto working as a profes¬ 
sional computer hobbyist. 


sent directly to thè author. Politicai 
controversy is not welcomed. 

How It Works 

Line 100 is thè way we usually 
start programs out in thè West. This 
clears thè screen of any pictures or 
text you may have had, and returns 
all variables to zero. Some smart- 
aleck kids in centrai California stili 
do things like POKE -16304,0 : 
POKE -16303,0: CALL -936. It 
really isn’t necessary, you know. 

Line 120 warns us that something 
might go wrong. If it does, thè pro¬ 
gram will go to line 666. We’ll worry 
about it later; probably nothing will 
go wrong. 

Lines 130-160 are credit lines. 
This is thè reward program authors 
get instead of money. 

Lines 170-180 are where thè pro¬ 
gram really begins. The excitement 
will start to mount as we position thè 
cursor exactly where we want it and 
then use thè command CALL 
-958. This will certainly impress 
thè other folks in thè room watching 
you, since only you will know that 
CALL - 958 clears thè screen from 


thè cursor to thè end of thè page. 

We could have easily made line 
170 an input sentence; that is: 

INPUT “WHAT SENTENCE?”;A$ 

If thè answer is more than a few 
characters long, it would continue 
on thè next line. This gives a neat 
40-character line to work with. 

Line 190 should be entered this 
way to format A$ so it can be han- 
dled properly in line 500. 

Lines 200-320 hold thè secret to 
thè whole thing. We are performing 
an instring search—whatever that 
is—and trying to find certain se- 
quences of letters within thè sen¬ 
tence. If we do—wow—we can do 
something about it. 

The For-Next starts at line 200 
and finishes at 320. Let’s look at line 
270, for a specific example. 

As thè For-Next loop is counting, 
if it finds three letters in a row that 
are O-L-D, then it will give thè vari- 
able S$ thè value of OLE. It will as- 
sign Y thè value of 3. It will go to line 
500. Hang in there for an explana- 
tion of what happens at line 500. 

Lines 330-340 pretty up thè spac- 


100 

TEXT : HOME : CLEAR 



110 

REM PROGRAM LENGTH= 

ÌOOO 


120 

ONERR BOTO 666 



130 

REM 




150 

REM 




160 

REM IX/ 

XXV/MCMLX X XII 


170 

VTAB 3: 

HTAB 1 : CALL 

- 958: PRINT "WHAT SENTENCE?" 


180 

FRINT : 

INPUT " M ;A* 



190 

A* = CHR* (32) + A* 

+ CHR* (32) + CHR* (32) 


200 

FOR X = 

1 TO LEN (A*) 


210 

IF MID* 

(A*,X,3) = 

"MR " THEN S* "MISTER ":Y = 3: GOTO 

500 

220 

IF MID* 

(A*,X,4 > = 

"MR. " THEN S* = "MISTER ":Y » 4: GOTO 

500 

230 

IF MID* 

(A*.,X,3> = 

"ER " THEN S* « "AH ":Y = 3: GOTO 500 


240 

IF MID* 

(A*,X,4) = 

"YOU " THEN S* * "Y”ALL ":Y a 4: GOTO 

500 

250 

IF MID* 

<A* S X,2> = 

" E" THEN S* = " ’":Y = 2: GOTO 500 


260 

IF MID* 

( A* , X , 2 ) = 

"ER" THEN S* a "UH":Y a 2: GOTO 500 


270 

IF MID* 

(A*, X, 3) = 

"OLD" THEN S* a "0LE":Y = 3: GOTO 500 


280 

IF MID* 

(A*„X, 5 ) = 

"NORTH " THEN S* a "■/.#*$<*" :Y = 5: GOTO 

500 ‘ 

290 

IF MID* 

(A*,X,3> = 

"ARE" THEN S* = "AIR":Y = 3: GOTO 500 


300 

IF MIO* 

(A*, X , 5 ) = 

"THING" THEN S* a "THIN":Y = 5: GOTO 500 

310 

IF MID* 

(A*„X,3) - 

"ANY" THEN S* = "INY":Y a 3: GOTO 500 


320 

NEXT X 




330 

FRI NT 




340 

PRINT "TRANSLATION:" 

: PRINT 


350 

INVERSE 

: SPEED= 50: 

PRINT A*: SPEEDa 255: NORMAL 


360 

VTAB 22: 

HTAB ls PRINT "ANOTHER? (Y/N) "; : GET AN* 


370 

IF AN* < 

> "N" THEN 

170 


380 

END 




500 

N* - LEFT* (A*,X - 1) + S* + RIGHT* (A*, LEN (A*) - (X - 

1) - Y> 

510 

A* - N*: 

GOTO 200 



666 

PRINT : 

INVERSE : PRINT CHR* (7);"== SOMETHIN’ WRONG...TRY AGAIN 1 == 


": NORMAL : GOTO 170 


1 



Program listing 1. The Rebel. 
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FREE SOFTWARE 


ing and get ready for thè program to 
show off. 

Line 350 looks so innocent, you 
may very well miss thè great social 
implications in it. What happens 
here is that thè Inverse command 
was given, speed reduced for em- 
phasis, thè sentence was printed in 
translated form and thè speed and 
text printing were retumed to nor- 
mal. The marvelous part of this all is 
that thè sentence could have been 
changed a dozen times or more be- 
f ore it was printed and no one would 
ever know it. 

Lines 360-380 are not originai. 
They were eopied from a graphics 
program I bought for $50, and this 
was thè only part I could understand. 

Line 500 is a gem. This is thè line 
that really does all thè worìc, and in 
such a clever manner. 

We talee thè originai sentence, use 


100 TEXT : HOME * CLEAR 
110 REM 
120 REM 


thè LEFT$ part of it (because thè 
program jumped here when it found 
a match) and then replace thè wrong 
word with thè right word (S$) and 
add thè rest of thè originai sentence 
again, using thè Y as a starting point. 
We have now made a new sentence, 
with one correction in it. 

The program then retums to line 
200 to talee another crack at it. When 
it can find no more to do, it will quit 
coming here and print thè translation 
in line 350. 

Line 666 will catch any mistakes 
you make when you enter nasty 
words, dumb things or phone 
numbers. 

Note how certain phrases were se- 
lected; in line 230 thè midstring is 
E-R-space, to insure that this change 
will only be made when ER is at thè 
end of a word. 

You may want to try some simple 


130 REM 
140 BZ * - 16336 

150 INPUT "WHAT MODERN NUMBER? "?N x 

160 IF N > 80 THEN HOME * GOTO 150 

170 IF N < 1 THEN END 

190 SPEED- 200 

190 HOME 

200 INVERSE 

210 FOR X - 1 TO N 

220 IF X > 20 THEN L = 5 

230 IF X > 40 THEN L = 10 

240 IF X > 60 THEN L ~ 15 

250 IF INT (X / 5) * X / 5 THEN GOTO 370 

260 FOR Y « 1 + L TO 5 + L 

270 VTAB Y* HTAB 2 I X! PRINT " » 

290 PC - PEEK (BZ) 

290 NEXT Y 

300 VTAB 24È HTAB 3* PRINT X* 

310 NEXT X 
320 NORMAC 

330 FOR W « 1 TO 20001 NEXT H 

340 Z * PEEK (2002)tZl » PEEK (2003) 

350 FOR I * 3 TO 37* POKE 2000 + I,Z* POKE 2001 + I,Z1* POKE 1999 + 1,160 
t FOR H - 1 TO 1001 NEXT HtPG = PEEK (BZ) + PEEK (BZ>* NEXT I 
360 VTAB 23* HTAB 1* SPEED- 255* END 
370 REM 

FIVE MARKER 


390 VTAB 3 + L* HTAB 2 * X - 9* PRINT 
(BZ)* NEXT 0* GOTO 300 
390 REM 

INSTRUCTIONS * 

400 REM 
N 
0 
N 
E 

410 REM REM 
3PR40 


FOR O - 1 TO 20 *PG - PEEK 


Program Hstmg 2. Crow-Magnum mystery program. 


The BIG RED APPLE CLUB is on Apple users 
group organized ro provide rhe benefirs 
of club membership ro anyone whom 
becouse of geographic or personal reasons 
does nor belong ro o locai Apple group. 

Club benefirs include: 

*OVER 100 DISK 5IDES of public do¬ 
main software, available ro members 
free of charge. Library progroms fea- 
rure games, Utilities, business applica¬ 
tion^ ere 

♦THE SCARLETT LETTER a monrhly news¬ 
letter conraining Utilities^ rechnicol rips, 
educarional applicarions, and pro- 
ducr reviews. 

♦MODEM-LESS BULLETIN BOARD. A 
unique merhod for club member 
communicarion. The DISK NETWORK 
offers members rhe benefirs of o 
modem-rype bullerin boord wirhour 
rhe expense of o modem. 

*MUCH, MUCH MORE! Write for deroils 
roday. Sample newsletter Si .00 

Annuol membership: $12.00 

f BIG RED APPLE CLUB 
1301 N. 19rh 

ffSfPI Norfolk, NE 68701 
402/379-3531 

Member Inrernotionol Apple Core 
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UTIL 

A COMPLETE DISK UILTY PACKAGE 


From thè creators of thè PIRACY PRUF 

disk protection System Comes a new 

System which gives you thè power 

to: 

• Protect a disk from standard cop- 
iers 

• Assign password protection to 
prevent unauthorized access 

• I ncrease disk Storage space by up 
to 25 sectors—identifies an ex- 
panded disk with a new catalog 
volume message 

• Change DOS commands—for ex- 
ample replace ‘Catalog” with ‘Cat’ 
for convenience or for protection 

• Change DOS error messages— 
for example replace ‘File Locked’ 
with ‘Get Key 

• Undelete a deleted file 

• Fix thè catalog sector count 

• Rebuild a blown catalog and/or 
VTOC to recover blown disks 

• Change nameof thè ‘HELLO’ pro¬ 
gram after a disk has been initial- 
ized 

• Define thè ‘HELLO’ file type (Ba¬ 
sic, Binary, Exec.) 

• Alphabetize thè catalog and re¬ 
move old entries. 


UTIL requires an Apple II with Apple¬ 
soft, DOS 3.3,48 K and one drive. The 
price is $39.95, N.Y.S. residents add 
sales tax Send check or money order 
to KANE COMPUTING, 184 PINE- 
BROOK BLVD., NEW ROCHELLE, 
N.Y. 10804 

Apple is a registered trademark of Apple Computer Ine. 
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sentences at first like: 

HOW ARE YOU? 

ARE THINGS GOING WELL UP NORTH? 

IT IS COLD IN NEW JERSEY IN THE 
WINTER 

and then 

MR. RAYMER AND PAUL’S ELECTRIC 
COMPUTER ARE AN OLD WESTERN 
PERSONAL COMPUTER GROUP IN- 
VOLVED IN MANY EXCITING THINGS. 

Have funi 


Crow-Magnum 
Counting System 

When I was advised that The Rebel 
was going to be published in inCider , 
I was so excited that I showed thè 
postcard from thè editors to everyone 
I met. Most folks just looked thè other 
way, some crossed thè Street to avoid 
talking to me, one guy laughed when 
he saw thè postmark “NH” and said, 
“There is no such a place.” Perhaps 
he was correct. 

Then, outside thè stage entrance to 
thè Nevada Library and Dance Hall, 
I was approached by a tali, mean, 
Texas-cowpoke-looking woman who 
said she had heard about my un- 
friendly program about thè South 
and asked that I prove my openmind- 
edness by presenting a program her 
brother had written. 

This program, Crow-Magnum, 
(see Listing 2) is based on information 
she had written on thè back of a Lone 
Star beer label. I have taken some 
liberties with her version to prevent 
thè program from getting too pon- 
derous, plodding or pedestrian. 

Apparently her brother Neal had 
intended to depict a series of counting 
sequences, but thè GR command on 
his Apple (and he has an old version) 
didn’t work—so thè entire program is 
written in text. It is quite amusing, 
about as amusing as Sam Houston 
found things when he and General 
Ana met in E1 Paso, or Houston, or 
Fort Worth or wherever. 

The program is very short, will not 
take long to enter, and can quickly be 
erased from your Apple by typing thè 
command “NEW”. 


How thè Program Works—If At All 

Lines 100-130 only clear thè screen 
and get everything ready to go. 

Line 140 assigns a value to BZ. You 
can teli noises are about to happen 
later when you see thè - 16336. 

Lines 150-190 get a value for N. 
The rest of thè stuff is to make sure 
thè number is not bigger than 80, nor 
less than 1. Then thè speed is reduced 
and thè screen cleared. Seems like an 
awful lot of work, and you wouldn’t 
have to bother with it if everyone did 
everything right in thè first place. 

Line 200 makes things inverse. We 
cali this an Inverse command because 
everything will now be inverse until 
we teli it to be normal. Gives a pro- 
grammer a great sense of power to 
have that ability, dont you think? 

Lines 210-310 are going to do all 
thè work. 

Line 210 decides how many times 
whatever it was that Neal had in 
mind to happen, will happen. 

Lines 220-240 determine on what 
part of thè screen to print. As thè val¬ 
ue of X gets larger, thè further down 
(south) thè image will print. This is 
done in steps of five for some reason 
known only to Neal, his sister and 
General Houston. 

Line 250 is reai neat. It only does 
whatever it does when X is exactly 
five! This is known as thè Cinco de 
Mayo effect. Sometimes, program- 
mers who dont want to know when a 
program counts exactly five will 
“hold thè mayo.” 

Lines 260-290 draw lines. It will 
look like graphics. This is similar to 
thè command GR and VLIN what¬ 
ever to whatever, but as explained 
earlier, Neal’s GR command didnt 
work. If your thing doesn’t work 
sometimes, you may want to try this. 

(Did you notice how line 280 was 
snuck in to make a little noise every 
time a plot was made on thè screen?) 

Line 300 prints thè value of X on 
thè screen as proof that something is 
happening. Sometimes this program 
becomes so complex that you might 
forget that your computer need not 
be used for serious mathematica! 
computations all thè time and should 
periodically be used for fun, games, 
play, entertainment. It also gives thè 
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SQR, TAN, COS, LOG, SIN and 
EXP functions in ROM a chance to 
rest up a bit. 

Line 320 retums thè program to 
normal. This means thè power 
gained by employing thè Inverse 
function has now been retumed to 
your computer. Don’t be depresseci. 
More excitement is to come! 

Line 330 is a delay loop. This is a 
chance to show your creativity. You 
may use thè variable Z (for ZZZ) or H 
(for Hang in there) or whatever you 
wish (I used W for Wait) and then 
you can choose any numbers. I used 
2000, since that is thè year when my 
last house payment will be made. 
Well known programmers like Bert 
Kersey use numbers like 1234 (shows 
freedom of spirit); Neil Konzen uses 
3D0G (to indicate Floating Point In- 
teger); I can t say what Ed Zaron of 
Muse uses since my Super-Text pro¬ 
gram is protected so well; and thè 


guys at Sensible Software use D5 AA 
FF, because they talk that way in 
Michigan. 

Lines 340-350 are truly state of thè 
art for Apple programming. This al- 
gorithm, when completely mastered, 
will enable you to write programs 
like PacMan, Defenders, Donkey 
Kong and Road Apples—programs 
now available only on non-Apple 
computers. This little routine basical- 
ly looks at two specific screen loca- 
tions, memorizes what is there, and 
at blistering speed (for Basic, that is) 
trànsports that information across thè 
video screen. 

Line 360 retums thè cursor to bot¬ 
toni of screen, returns speed to nor¬ 
mal and ends thè program, not 
knowing that more is to come in thè 
listing. 

Lines 370-380 comprise thè sub¬ 
routine that performs thè graphic dis¬ 
play required by line 250 above. This 


complex type of programming can- 
not be accomplished by mathemati- 
cal calculation. It must be done by 
trial and error, since nothing this 
bold has been done since David Ahi 
invented thè computer in about 
1967. 

Lines 400-4000 are not required, 
since there were no instructions with 
this program. There were, of course, 
but they were unintelligible and so 
are not being presented at this time. 

While not thè originai intent of thè 
author, this program is dedicated to 
those math students, financial wiz- 
ards and computer buffs who delight 
in numbers—this program will show 
thè outside world that binary, hex, 
decimai and Roman are not all that 
man/woman lives by. 

My thanks again to Neal Andra- 
thaal and his stadwart sister for their 
insistence that this program be foist- 
ed upon an unsuspecting public. ■ 
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NEW! M-68000 

SINGLE BOARD COMPUTER 
FOR APPLE II USERS 



FEATURES: 

32 bit Motorola 68000 CPU operating at 5 
MHz or 10 MHz. 20K of on board fast static 
RAM, 16K bytes of on board EPROM space, 
7 autovectored lnterrupts, 3 meraory/* 
device expanslon buse», 2 serial com* 
municatlon porta (RS-232 C), 16 bit 
bidlrectional parallel port, 5-16 bit 
counter/timers with vectored intemipt and 
time of thè day clock. On board monitor 
allows to download and debug programs 
generated on APPLE II using our M68000 
Cross Assembler. 


M68K Bare board with documentatlon.$ 99.95 

M68MON monitor & mapplng PROM’*.$135.00 

M68000-6 CPU..$ 95.00 

M68K Parta Kit.$249.00 

M68000 Cross Assembler for APPLE II.... $125.00 

M68K Documentatlon only.$ 15.00 

Shlpping & handllng ( Domestici... .$ 3.50 

(foreign)....$ 15.00 
CALIFORNIA RESIDENTS ADD 6% TAX 
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INTRA's PSIO 
& ASCII EXPRESS 


Give your APPLE thè most versatile and accurate data transfer 
capabilities available. Combinins thè PSIO’s prosrammable hard¬ 
ware options with thè Editor, Directory, and Keyboard Macro 
features of SDS’s ASCII EXPRESS: PROFESSIONAL, there is virtual- 
ly NO Computer System it can’t be used with. This is thè only hard¬ 
ware/software combination available to offer 5-LEVEL BAUDOT 
CODE; CURRENT-LOOP TELEX capability,- and all desireable 
RS-232 and ASCII UTILITIES for APPLE COMMUNICATIONS. 


Programmatole Serial I/O Board .. 199 ”, 

ASCII EXPRESS: Professional.129” 

300 Baud 103LP Modem.245 00 / 

1200 Baud202LP Modem.295 00 

1200 Baud 212LP Modem.495 00 


SpECÌAl 

10% Off 

wkiN you buy 
2 

OR MORE ÌTEMS 


EMS uncroeomjrater (714) 

P O. BOX 16115 IRVINE, CA. 92713 553-0133 


Computer 




101 w. 31 st, N.y., N.y. 10001 
(212) 947-5533 
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. 

thè PERSONAL LANGUAGE ™ System 
that mlrrors your commands using 
your own wordsf 


WhatSAWYis- 

i SAWY is a miraculous new 
Information handling System. 

2 . SAWY is an automatic database 
management System. 

i SAWY is a new level of 
machine intelligence. 

a SAWY, part hardware, 
part software, is thè 
beginning of truly 
"Personal Computing ". 

.» SAWY Comes with: 

General Ledger, 

Accounts Receivable, 

Accounts Payable, 

Payr oli, Mailing List, 

Document Writer and 
Inventory Control. 

Trademark: SAWY, Robot Programmer: 

Excalibur Technologies Corporation. 

Personal Language: SAWY Marketing 

International. 



What SAWY does — 

Through SAWY, you and your 
computer talk to each other in your 
own naturai, conversational 
English (or Spanish, or 
“t French, etc.). 

It learns from you 
what you want 
done in your own 
personal language. 

Once SAWY learns 
your language it 
can create any file 
you wish. Input, 
output, additions, 
changes and 
deletions are 

j * arran 9 ed f° r you. 

sAvwv'Robot 

Programmer'' 
has been trained 
towrite100% 
of thè programs 
needed to manage your 
database information. 
SAWYruns CP/M™ 
and Apple DOS. 

Circle 7 on Reader Service card 


What YOU discover — 

You'Il discover that SAWY 
recognizes your personal words, 
even if misspelled, or even if you use 
a phrase never used beforel 

SAWY continues to grow through 
use to become better and better at 
understanding your commands. 

Eventually, you will see SAWY as a 
mirror to your own way of thinking 
and working. It is a re-definition of 
"user-friendly 

SAWY, it's thè first System that truly 
means "personal computing 

SAWY is like no other System on 
earth. 

SAWY cost $950. 

Seeing is believing. SAWY is on 
display at selected computer retail 
locations. Cali for thè name of your 
nearest dealer. 

CP/M is a trademark of Digital 
Research Corp. 

Apple Is a Trademark of Apple Computer 
Ine. 


1250 Ookmeod Porkwoy Suite 210 Sunnyvole, CA 94066 (406) 773-1550 
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Fudge It! 


by Don Fudge 

A renowned expert puts graphics 
shapes at your fingertìps. 


Vector Graphics Made Easy 


T his is thè first of many Apple 
graphics columns I pian to do. 
There’s little danger TU run out of 
material—thè Apple can do more 
tricks than all thè dogs and magi- 
cians who ever lived (combined). 
For openers, IVe chosen shapes. 

Some computers contain a special 
graphics chip that allows sprite 
shape animation. With sprites, thè 
hardware supports thè movement of 
whole shapes or shape segments 
when sprite coordinates are 
changed. Shape superimposition is 
handled by video display planes up 
to 35 levels deep. 

The Apple, however, has no spe¬ 
cial graphics chip—graphics must 
be processed through Apple’s 6502 
microprocessor. You can add pe- 
ripheral boards containing any 
number of special chips to give your 
Apple super arcade quality anima¬ 
tion and graphics. But without such 


hardware assistance, Apple users 
must be content to operate within 
thè limitations of 6502. One of thè 
6502’s limitations is its 8-bit capaei- 
ty; a 16-bit microprocessor, such as 
thè Motorola 68000, would be 
10-100 times faster for graphics ap¬ 
plication (see CALL A.P.P.L.E., 
Aprii 1982, pp. 15-17, “68000 
BOARD”). 

The Texas Instruments TMS 
9918A Video Display Processor is a 
multimode graphics processor now 
available on an Apple peripheral 
board (cali me if you want more in- 
formation). It’s a perfect example of 
a chip that will give you better, fast¬ 
er graphics and use of sprites. 

Okay, enough of admiring thè 
greener grass on thè other side of thè 
microchip. Staying within thè limi¬ 
tations of Apple’s 6502, a micropro¬ 
cessor IVe come to know and love, 
what can you do with shapes? 



Well, staying within Applesoft 
Basic, you could use standard Apple¬ 
soft shape tables and Applesoft’s 
convenient DRAW, XDRAW, 
ROT, SCALE, HCOLOR and (if 
you’re silly enough to use shapes on 
tapes) SHLOAD commands. You 
can draw these shapes in whatever 
orientation (ROT = rotation) or 
scale you like. The only problem is 
that thè Applesoft manual gives an 
extremely primitive method for cre- 
ating shape tables (pp. 92-100). 
With their method, shape creation 
and shape saving are an unmitigated 
pain in thè assembler. 

I know that anyone interested in 
creating Applesoft vector shapes 
will want to avoid doing it thè hard 
way, so Fm including a printout of 
a program (one of thè ones from 
Avant-Garde Creations’ Super 
Shape Draw and Animate package) 
that will allow you to create shapes 
thè easy way. 

Ylì be referring to such shapes as 
vector shapes, since Apple uses thè 
term vector to describe its direzion¬ 
ai plot-or-move arrows used in shape 
table calculations. 

Vector shapes are one of three 
main types of shapes supported by 
thè Apple. Remember, creating fast¬ 
er and better graphics via 16-bit 
CPU utilization or sprite graphics 
chips requires extra (peripheral) 
hardware, so I won’t consider sprites 
here. The other two are hplot shapes 
(see next month’s column) and block 
shapes (see thè column two months 
from now) that some folks cali raster 
or bit-mapped shapes. 

If you’re reading this column you 
almost certainly own or have access 
to thè Applesoft Manual. For more 


Address correspondence to Don Fudge at 
Avant-Garde Creations , PO Box 30160 , 
Eugene, OR 97403. 











































but thè MAGIC goes on... 


The latest additions to thè ARTSCI family of fine software products are: 


MAGIC WINDOW II ™ - an 

advanced version of thè 
MAGIC WINDOW ™ word pro¬ 
cessor, voted “User’s 
Favorite.” New features in¬ 
clude 80-column board and 
hard-disk compatibility, 
70-column upper and lower 
case display, 160-character line 
length, multiple-copy print 
feature, and DOS housekeep- 
ing commands within thè 
program. $149.95 


MAGICALC™ — a completely 
new spreadsheet program 
which includes 70-column 
upper- and lower-case video, 
80-column board and hard- 
disk compatibility, individuai 
column widths, invisible col- 
umns for confidential data, 
and full compatibility with 
VisiCalc.™ Expansion memory 
boards may be used to ex- 
pand thè worksheet size. 

$149.95 


Both programs are completely 
compatible with thè rest of thè 
MAGIC series: 

The MAGIC WINDOW™ word 
processor. 

$99.95 

The MAGIC WORDS™ spelling 
checker. 

$69 95 

The MAGIC MAILER™ mailing 
list merge System. 

$69.95 

(And there’s more to come!) 


ARTSCI - a new look, with thè same old rellability at an affordable price 




5547 satsuma avenue • north hollywood, California 91601 • 213/985-2922 

VisiCalc is a registered trademark of VisiCorp. MAGICALC is a trademark of Artsci, Ine. 


artsci. 

where ort and Science morto for you 
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Program Usting 1. Shapedrawing program. 

O ONERR BOTO 63990 

1 BOTO 114 

2 BH = 1: RETURN 

3 IF BYTE - BE > « 986 AND FA < >1 THEN POP s GOTO 18999 

4 RETURN 

5 IF KEY = 172 THEN OLDY » OLDY - 1:DX = DX - 1 

7 IF KEY = 172 AND K9 * 1 THEN OLDY = OLDY + 2 

8 IF KEY = 213 AND K9 = 5 THEN OLDY = OLDY - 2 

9 IF KEY * 206 THEN OLDY = OLDY - lsDX = DX + 1 

11 IF KEY * 207 THEN OLDY = OLDY + 1:DX = DX + 3 

13 IF KEY = 213 THEN OLDY = OLDY + lsDX * DX - 3 

15 IF KEY = 207 AND K9 - 3 THEN OLDY = OLDY - 2 

16 IF KEY = 206 AND K9 = 7 THEN OLDY = OLDY + 2 

20 RETURN 

30 TK = KB:KB « K9: IF K8 = 215 AND K9 = 215 THEN K8 = TK 

31 RETURN 

114 CALL - 936: INPUT "NUMBER OF SHAPES IN TABLE?(1-126)s”;NU 

115 IF NU > 126 OR NU < 1 THEN 114 

116 NB = O 

118 WG * 2 

119 DIM XX(1001>,YY(ÌOOI) 

130 DIM C(3):C(1) * 0:C<2> = 0:C<3> = O 
145 ADR = 2360 

150 LOC « 2360:X = 139:Y = 79 

151 POKE LOC»1: POKE LOC + 2,4: POKE LOC + 3,0:LOC = LOC + 4:LC « LOC 

152 POKE LOC +1,0 

153 PFLAG = 0:LL = FRE (O): CALL 54915:AF = O: IF ZX = 1 THEN LOC * LOC + 

1 

154 BE * BYTE:FA = O 

159 IF AA = 1 THEN AA = 0:AF — 1 

160 HGR : HCOLOR= 3: ROT= O: SCALE= 1:N = 0:C(0) « 8: BOSUB 550 
170 VTAB <22>: PRINT "BYTE NE=0 N=I NW=U PLOT MODE:" 

175 FLASH : VTAB 22: HTAB 36: PRINT "OFF”: NORMAL 
180 VTAB 23: PRINT "ROOM: E=L W=J M 

190 VTAB 24: PRINT "5828 SE=, S=M SW=N BYTES USED: M 

195 VTAB 22: HTAB 25: PRINT "SHAPE: 

199 VTAB 23: HTAB 37: PRINT BYTE - BE + 4 

200 GOSUB 30: POKE - 16368,0: IF SG > O THEN 31000 

201 K8 = K9: VTAB 23: PRINT " VTAB 23: PRINT 8192 - LOC: GOSUB 3:K9 * 

KK 

203 KK = KEY : LF = O 

204 VTAB 22: HTAB 32: PRINT NB + 1 

205 KEY = PEEK ( - 16384): IF KEY < 128 THEN 205 

206 IF BH = 1 THEN 900 

207 GOTO 211 

208 GOSUB 5 

211 BH = O: IF KEY * 197 THEN 25000 

212 SV = OlFF = O:TT = O: IF KEY = 215 THEN 2300 

219 IF KEY = 133 THEN 20000 

220 IF KEY = 208 THEN KEY = KEY - 176 

221 IF KEY = 134 THEN 420 

222 IF KK = 215 THEN BOSUB 2400: IF K9 > O AND K9 < 9 THEN GOSUB 2330 

223 IF KK « 215 AND K9 « 215 THEN GOSUB 2730 

225 IF KEY * 147 THEN ZZ = 1: GOTO 420 

231 IF KEY - 207 THEN KEY - Ir GOTO 300 

232 IF KEY = 203 OR KEY * 204 THEN KEY = 2: GOTO 360 

233 IF KEY =172 THEN KEY = 3: GOTO 330 

234 IF KEY = 205 THEN KEY = 4: GOTO 330 

235 IF KEY = 206 THEN KEY = 5: GOTO 330 

236 IF KEY = 202 THEN KEY = 6: GOTO 390 

237 IF KEY =213 THEN KEY = 7: GOTO 300 

238 IF KEY = 201 THEN KEY = 8: GOTO 300 

245 IF KEY < >32 THEN 200 

250 PFLAG = NOT PFLAG 

260 VTAB 21: HTAB 36: IF PFLAG « O THEN 280 

270 PRINT H 0N "t GOTO 200 

280 FLASH : PRINT "OFF": NORMAL 

290 GOTO 200 

300 IF OLDY = O THEN 200 

305 Y = OLDY - 1 

310 C(N) = O: IF PFLAG = 1 THEN C(N) =4 

315 GOSUB 550 

320 IF KEY = 7 THEN 390 

322 IF KEY = 1 THEN 360 

324 GOTO 200 

330 IF OLDY = 159 THEN 200 
335 Y = OLDY +1 

340 C(N) = 2: IF PFLAG = 1 THEN C(N> =6 

345 GOSUB 550 r 

350 IF KEY = 5 THEN 390 

352 IF KEY = 3 THEN 360 

354 GOTO 200 

360 IF DX = 279 THEN 200 

365 X = DX + 1 


Listmg continued. 
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information on vector shapes, see 
pp. 92-100. 

Here now is a nice little Applesoft 
Basic program to make shape crea- 
tion a snap for you (see Listing 1). 
May it save you from much needless 
wasted time. 

By thè way, Shapedrawing will 
not work uniess you POKE103,1: 
POKE104,64:POKE16384,0 before 
running it (you may do this in a 
Hello program than runs Shape¬ 
drawing after thè Pokes). Also, leave 
HIMEM at default 38400. 

Much of thè Shapedrawing pro¬ 
gram is dedicated to making editing 
possible. The program would be 
much shorter if not for thè E and W 
commands, and having diagonal 
plotting as well as horizontal and 
vertical plotting. Also lengthening 
thè program is thè Unlimited Move- 
up feature. Perhaps you’re aware 
that move-ups without plotting are 
equal to 0, so that if you do several in 
a row you’ll end up with a hex byte 
of 00 for your shape table, which 
would meati “end of shape . ” 

In line 640 thè table byte is calcu- 
lated. If it’s 00 then we end up at line 
660 rather than 670, which changes 
00 to 128 or $80 and changes thè im¬ 
pact of thè line to two move-ups and 
one move-down, or one move-up in 
net effect (128 = $80 =10 000 
000 = down up up). A $80 byte does 
not signal “end of shape,” so thè 
shape continues. 

Most of thè rest of thè program is 
too complex to discuss here—it 
would take half thè magazine. So 
let’s turn to thè instructions for using 
this program to create nice, fast, 
easy-to-do shape tables—after one 
last consideration. 

I recommend thè program be- 
cause Fve often drawn dozens of 
shapes at one sitting with very few 
errors and very little need to edit. 
The program automatically saves all 
your shapes into an indexed Apple¬ 
soft shape table once youre done; 
just signal control-S (stop). If you 
decide you need programs to edit, 
continue where you left off, examine 
shape tables, and animate, or if 
you’re too busy to type in thè pro¬ 
gram listings and want a 50-page 






- Z80 CP/M’software --- 

HIGH QUALITY — LOWCOST 

Overbeek Enterprises is committed to providing quality software at extremely low prices. We 
achieve this by reducing overhead to essentially marketing and reproduction costs. We rely on 
responses from ads, ratherthan a distribution network. We invite you to considerthè following 
two products. 


25 


Micro-WYL 

A powerful, Z80 CP/M text editor 


29 95 


DISK INSPECTOR 

a program that runs under 
Z80 CP/M 1 for disk inspec- 
tion and modification 


Tired of trying to use ED under CP/M? This is thè 
editor developed by Realworld Software, Ine. and 
reviewed in Infoworld (11/15/82). 

- Here are quotes from customers and reveiwers- 

“Micro-WYL is undoubtedly thè hottest software 
bargain on thè marker 

“thank you, thank you, thank you” 

“Micro-WYL is truly terrific” 

- Those are quotes from unsoficited letters from our customers. 


“While I am an avid Wordstar user, I personally 
prefer thè ease and convenience of Micro-WYL 
when writing programs. The price is right and thè 
product is great. Try it. This editor has numerous 
features not described in this review- all of which 
help to make this product an essential part of your 
program base” 

- From a review in thè PASCAL MT Users Group Newsletter. 


“This editor is perfect for writing in nearly any 
programming language. (I) . . . find myself looking 
for excuses to use Micro-WYL, and certainly have 
no hesitation in recommending it to anyone whose 
requirements match thè capabilities of this inventive 
piece of software.” 

- From a review in Infoworld (11/15/82) 


We do offer a great editor at an unbelievably low 
price. WYLBUR 2 has been popularon IBM mainframes 
for over a decade. 

Now you can have thè convenience of WYLBUR on 
your micro. 

1 CP/M is a registered trademark of Digital Research, Ine. 

2 WYLBUR is a registered trademark of The Board of Trustees ofthe 
Leland Stanford Junior University 


Make your check out to: 


Have you ever been unable to read a file due to a 
bad sector? Have you ever erased thè wrong file? 
Disk Inspector acts as a full-screen editor for disk¬ 
ettes. You can simply watch as sectors are displayed 
on thè screen in both character and hex formats. 
When you wish to make thè display pause, touch thè 
spacebar. If you wish to alter a sector, it is a simple 
matter to move thè cursor over thè appropriate 
character, alter it, and have thè sector rewritten. 

Although Disk Inspector runs under CP/M you can 
inspect and alter normal (non CP/M) Apple diskettes, 
as well. The disk drives may be single or doublé 
density, single or doublé sided. The comprehensive 
manual will show you how to: 

Recover an erased file. 

Modify a director entry ; 

Ciean up a directory. 

Utilize thè CP/M Auto-Load feature. 

Create multiple directory entries. 

Read and modify non CP/M diskettes. 

The Disk Inspector is a full-screen editor for diska 
Our competitors offer products in thè $100-$200 
range. We certainly invite comparison of this product 
with any comparable System in terms of features or 
user friendliness. In terms of price, there is no 
comparison. 

Note: Disk Inspector requires an 80x24 screen on your CRT and is 
currently available only in 8 " SSSD, Kaypro, Apple/Softcard, 
NÉC, and Altos Series 5 formats. 


Overbeek Enterprises 

P.O. Box 726 
Elgin, IL 60120 


□ Apple/Softcard □ ALTOS Series 5 Northstar 5" OD 

□ KAYPRO II 5” □ Televideo TS-802 □ Advantage 

□ 8” SSD □ Osborne □ Horizon 

□ NEC 5” □ Superbrain 

Amount: $25 for Micro-WYL _ 

$29.95 for Disk Inspector __ 

$2 for postage & handling _ 


Name_ 

Address_ 


Circle 181 on Reader Service card. 


February 1983 Èider 151 





Fudge It! 



Figure 1. Keyboard commands to move 
cursor. 


manual as well, give me a ring— 
what you need is available. 

Now £or thè instructions: 

The commands in this program are: 

W = wipe out thè last several plot- 
points. 

Control-E = erase thè whole 
shape and start over. 

Control-S = stop and save. 

Control-F = this shape finished, 
let s go on to drawing thè next shape 
in thè table. 

E = edit (erasé thè last point 
plotted). 

P = plot/don't plot toggle switch. 

The keyboard commands that 
move thè cursor around are shown 
in Figure 1. When thè plotter is on, 
thè cursor commands cause moves 
plus point-plots. When thè plotter is 
off, thè cursor commands cause 
moves only—no plotting. 

L also works for moving right. 

Not having to turn thè plotter off 
and on during diagonal plotting is 
convenient. (Incidentally, if you 
want shapes to scale up nicely, al- 
ways leave thè plotter on and use on¬ 
ly I, J, K, M or L.) 

Here’s more detail on thè 
commands: 

Control-E = erase, thè shape’s no 
good; restart. 

Control-S = thè entire shape table 
is complete so save it on disk now 
(youll give a file name). 

Control-F = thè shape you’re on is 
done so go on to thè next one in thè 
table. 

E = erase last single plot only. 
Edits only one dot. Do not try to hit 
more than one E in a row—youll 
wreck thè shape. To erase more than 
one dot, use W. 

P = thè plotter toggle; it turns thè 
plotter on if it’s off and off if it’s on. 
Have it on to plot and off to move 
without plotting. 

W = wipe out several plot points. 


Listing continued . 


1 AND KEY = 2 THEN C(N) 


1 AND KEY = 6 THEN C(N) 


370 C(N) - 1: IF PFLAG 
380 GOSUB 550: GOTO 200 
390 IF DX = O THEN 200 
395 X = DX - 1 
400 C(N) * 3: IF PFLAG 
410 GOSUB 550: GOTO 200 
420 CALL - 936 

430 B = CU) + C(2) * 8 + C<3> * 64: POKE LOC,B 
440 IF B * O AND BYTE > O THEN 460 
450 LOC = LOC + 1: POKE L0C,0:BYTE = BYTE + 1 
460 GOTO 480 

472 POKE SOI + 2,(2 * NU) + 2: POKE SOI + 1,0: POKE SOI + 3,0: POKE SOI,N 
U:ADR = SOI 

473 VTAB 21: FLASH : PRINT "PLEASE REMOVE THIS DISK tt REPLACE IT WITH 

YOUR OWN INITIALIZED DISK NOW! <HIT ANY KEY TO CONTINUE)" 

474 POKE - 16368,0: GOSUB 23010: NORMAL :D* = CHR* (4): HOME 

475 VTAB 23: INPUT "SHAPE TABLE NAME: "|N$ 

476 PRINT D$;"BSAVE";N*;",A"; ADR;",L "5 (LOC + 2) - ADR 

477 HOME : TEXT 

479 PRINT "SHAPE TABLE 5AVED": GOTO 5000 

480 IF NU = 1 THEN SOI = 2360: POKE SOI,NU 

481 IF NU = 1 THEN 472 

482 IF NU = 2 AND NB = O THEN SOI = 2358:ADR = 2358: GOSUB lOOO 

483 BT = BYTE:LI = LOC 

485 NB = NB + la IF NU > 2 AND AF = O THEN GOSUB 2000 

486 IF NU > 2 THEN LC « LOC 

487 IF NU = NB OR ZZ = 1 THEN 472 

488 Y = 79:X = 139 

489 C<1) = O:C(2) = 0:C(3) = 0:ZX = la GOTO 153 
550 TC = C(N):TN = N: IF C(N) >3 THEN 580 

560 HCOLDR= O: HPLOT DX,OLDY 

580 HCOLOR= 3: HPLOT X,Y 

600 IF N > 2 THEN GOSUB 620 

602 IF C(2) =0 THEN IF N = 2 AND C(l) >0 THEN GOSUB 16000 

605 IF BYTE > O THEN OY * OLDY 

606 IF BYTE > O THEN OX = DX 

610 TT = TT + 1 : N = N + 1:DX = X:OLDY = Y: RETURN 
620 IF C(3> < 4 AND C(3> > O THEN 640 
630 SA - C(3):C(3) = O 
635 SV = 1 

640 B = C(l) + C(2) * 8 + C(3) * 64 
645 CI = C(1):C2 = C(2):C3 = C<3> 

650 IF B < >0 THEN 670 

660 B = 128: POKE LOC,B:LOC = LOC + 1: BYTE = BYTE + 1:XX(BYTE - BE) = X:YY 
(BYTE - BE) = Y 

670 POKE LOC,B:LOC = LOC + 1:XX(BYTE - BE) = X:YY(BYTE - BE) = Y 

680 BYTE - BYTE + 1: VTAB 23: HTAB 37: PRINT . VTAB 23: HTAB 37: PRINT 

BYTE + 4 - BE 
690 IF C(3) =0 THEN 710 

700 C(l) * O:C(2) = 0:C(3) - 0:SA = 0:N « O: RETURN 
710 C(l) = SA:C(2) = 0:C<3) = 0:SA = 0:N = la RETURN 


720 

850 

851 

852 

853 

854 

855 
860 
865 
870 
875 


END 
IF K9 


203) THEN 899 


885 

890 

895 


905 

907 

910 

915 

920 

925 

940 

945 

999 

1000 


2 AND (KEY - 204 OR KEY 

IF K9 = 4 AND KEY = 205 THEN 899 

IF K9 = 6 AND KEY = 202 THEN 899 

IF K9 = 8 AND KEY = 201 THEN 899 

GOTO 3000 

ON K9 GOTO 860,865,870,875,880,885,890,895,899 
IF KEY > 201 OR KEY < 205 THEN X = X + 2: GOTO 899 

201 OR KEY = 205 THEN X = X - 1: GOTO 899 

201 OR KEY < 205 THEN X = X - 2: GOTO 899 

201 AND KEY < 205 THEN Y “ Y — 1: GOTO 899 
201 OR KEY < 205 THEN X = X + 2: GOTO 899 

201 OR KEY = 205 THEN X = X + 1: GOTO 899 

201 OR KEY < 205 THEN X = X - 2: GOTO 899 

201 AND KEY < 205 THEN Y = Y + 1 


IF KEY 
IF KEY 
IF KEY 
IF KEY 
IF KEY 
IF KEY 
IF KEY 

899 HG = O: 

900 IF KEY 
IF HG 
IF HG 
IF K9 
IF K9 
IF K9 
211 
IF K9 
211 
IF K9 
211 
IF K9 
211 

GOTO 208 

POKE SOI,NU: POKE SOI + 2,6: POKE SOI + 3,0: POKE SOI + 5,0: IF BYTE 
+ 7 < 256 THEN POKE SOI + 4,7 + BYTE: RETURN 
1004 GG = INT ((BYTE + 7) / 256): POKE SOI + 5,GG 

1006 HH = (BYTE + 7) - ( INT ((BYTE + 7) / 256) * 256): POKE SOI + 4, 


GOTO 211 
> 200 AND KEY 
O THEN 910 

1 THEN 850 

8 THEN Y * Y 
4 THEN Y = Y 

2 AND (KEY = 


< 206 THEN HG 


+ 1: GOTO 211 
- ls GOTO 211 
207 OR KEY = 213) THEN Y 


=3 y 


2 AND (KEY = 206 OR KEY = 172) THEN X 


1:X = X - la GOTO 


1:Y = Y - la GOTO 


6 AND (KEY = 207 OR KEY = 213) THEN Y=Y-1:X*X+1: GOTO 
6 AND (KEY = 206 OR KEY = 172) THEN Y = Y+1:X**X + 1: GOTO 


Listing continued. 
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System Saver 



Por Line Surge Suppression 

The SYSTEM SAVER provides es- 
sential protection to hardware and 
data from dangerous power surges 
and spikes. 



By connecting thè Apple II 
power Input through thè SYSTEM 
SAVER, power is controlled in two 
ways: 1) Dangerous voltage spikes 
are clipped off at a safe 130 Volts 
RMS/175 Volts de level. 2) High fre- 
quency noise is smoothed out be- 
fore reaching thè Apple H. A PI type 
filter attenuates common mode 
noise signals by a minimum of 
30 dB from 600 khz to 20 mhz, with 
a maximum attenuation of 50 dB. 


For Cooling 

As soon as you move to 64K RAM 
or 80 columns on your Apple II you 
need SYSTEM SAVER. 

Today’s advanced peripheral 
cards generate more heat. In addi- 
tion, thè cards block any naturai air 
flow through thè Apple II creating 
high temperature conditions that 
substantially reduce thè life of thè 
cards and thè computer itself. 


SYSTEM SAVER provides cor- 
rect cooling. An efficient, quiet fan 
draws fresh air across thè mother 
board, over thè power supply and 
out thè side ventilation slots. 



For Operating Effìciency 


SYSTEM SAVER contains two 
switched power outlets. As shown 
in thè diagram, thè SYSTEM 
SAVER efficiently organizes your 
System so that one convenient, 
front mounted 
power switch 
Controls SYSTEM 
SAVER, Apple E, 
monitor and printer. 


POWER 




PRINTER 


The heavy duty switch has a 
pilot light to alert when System is 
on.You’ll never use thè Apple power 
switch agami 


Easy Installation 


Compatible with Apple Stand 


Just clips on. 

No mounting or 
hardware required. 
Color matched 
to Apple H. 



PATENT PENDING 



SuggestedRetali $QQ95 
One Year Warranty w 


Kensington Microware Ltd. 
300 East 54 Street, Suite 3L 
New York, NY 10022 
(212) 486-2802 



KENSINGTON 

MICROWARE 
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a) 

hitK 

• 

• • • 

• 

(plot is on) 

b) 

hit K 



• • • • 

• 

• 


c) 

hitK 

• • • • 

• 

• 

(it doesn’t show, it’s on top of a previous plot) 

d) 

tura plot off: hit P 



hitK 



e) 

• 

• 


f) 

tura plot on: hit P 


g) 

hitK 

• 

• 

• 

• 

(and continue) 



Figure 2. Proper sequence for line Crossing. 


It allows you to go back and fix 
things. You may not hit a series of 
E’s to do this; you may hit a series of 
W’s, however. (But if much of thè 
shape needs fixing, or if a mistake 
was made early in thè drawing, thè 
smart way is to go back and restart 
with thè Control-E command.) 

A few words about thè W com¬ 
mand: It does complex things and 
must be handled “just so.” Here’s a 


rule: Always make sure that thè 
point you plot after using W is plot- 
ted in thè same direction as thè last 


visible dot on thè screen was plotted 
relative to thè plot before it. In order 
to accomplish this, you’ll sometimes 
have to hit W twice in a row. 

Here’s another rule: If thè point 
you plot after hitting W gives you a 
screen dot that is not continuous 
with thè rest of thè shape, or is other- 
wise defective, then hit W once or 
twice more and then plot thè next 
point in thè same direction as thè last 
visible point-plot. So, if you hit I be¬ 
fore hitting W, then you must hit I 
once you’re done hitting W’s (if 
you’re stili trying to move upwards; 
I means up in Shapedrawing). 

When Crossing a line with another 


Shape # 

12 12 12 1 

2 


♦ 

V 

ROT = 

0 0 16 16 32 32 48 

48 


Figure 3. Setup for shape rotation. 
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F=-I IMÉ*I_L_Y ! ! 


A GREAT GAME EXCLUSIVELY FOR THE APPLE III ! ! ! 

PICK THAT TUNE contains 100 different popular 
tunes divided into these four categories: 

Pop, Country Se Western, Children and TV tunes. 
There are 16 different game variations and 
■from 1 to 10 players can play! Using thè sound 
generator, PICK THAT TUNE wi11 begin with thè 
lowest bidder and play thè number of notes 
that each player has bid. High scores can be 
obtained by underbidding your opponents and 
picking tunes correctly. TOP TEN PLAYER files 
are automatical1y maintained by PICK THAT TUNE. 
Whether your Apple III is used for business or 
pleasure, PICK THAT TUNE is a must -for your 
so-ftware collection (Requires Apple Business 
Basic). To order, send check or money order 
for *29.95 to: 

Swearingen Software 
6312 W. Little York 
Suite 197 

Houston, Texas 77088 


Circle 34 on Reader Service card. 


PROTECTING YOUR APPLE ... 
AN OPEN AND SHUT CASE 



Introducing thè APPLE- ^ 

opening and closing § 

cabinet for thè Apple II. . ]yf 

CENTER opens up 
toallowyouquick 
and easy access. 

Locked with thè 

key thè APPLE-CENTER ~ 

shuts tight to protect your 

Apple and 2 disk drives. The key also switches power to your 
Apple and your monitor. Both outlets are protected from dam- 
aging voltage surges with RKS Industries' SURGE SENTRY We've 
even built in a filtered cooling fan. Model IO comes without 
electrónicsand is compatible with side mounted fans. 


(gpplexcenter ) 

Cali or write for additional Information: 

HI DOSS INDUSTRIES 

1224 Mariposa, San Francisco, CA 94107 (415) 861-2223 

Apple is a registered trade mark of Apple Computer, Ine. 
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shape line, you’ll need to know that 
thè last dot you made is an arrow 
(vector direction), not a plot. That’s 
why, even though other shape- 
drawers always seem to be one step 
behind where you are, my program 
will make you feel that thè drawing 
is right with you; this is much easier 
to deal with as a utility, as you’ll see. 

The proper sequence for line 
Crossing is shown in Figure 2. 

Another thing you should know is 
that, before you hit control-S or con- 
trol-F, you must first add an extra 
dot, because thè last dot is thè vector 
arrow, not thè vector plot. Failing to 
plot an extra dot (it should aim in thè 
same direction that you’re traveling) 
will result in a dot missing from your 
shape (thè last one “plotted”). 

You’ll need to know about center- 
referencing. Shapes are drawn with 
commands like DRAW 1 AT 79,68 
or DRAW 99 AT 87,4. The two 
numbers are thè coordinates (X, Y) of 
thè shapes’ reference (starting) 
point; thè shapes will pivot on this 
point during rotations (ROT). If you 
want a center-referencing shape 
(which rotates like a wheel on an ax- 
le), make sure you start drawing in 
thè center of thè shape. (It’s okay to 
leave thè plotter off until you reach a 
shape edge and then hit P to start 
plotting.) 

You’ll also want to know how to 
set up a shape that rotates complete- 
ly; a rocket ship must pivot in every 
direction as it shoots at asteroids 
coming at it from all sides. Simplv 
draw one rocket facing straight up 
(north), and another facing diago- 
nally (45 degrees) to thè northeast. 
Make thè dimensions of thè second 
rocket 2 A or 70 percent of thè first 
rocket’s dimensions, or thè rocket’s 
size will grow/shrink unrealistically 
upon rotation. The setup is shown in 
Figure 3. 

You’ll notice, if you look at a col- 
ored scene on a black and white 
monitor, that color is created by 
plotting every other dot horizontally 
across thè screen. Keep this in mind 
when you draw your shapes. For in- 
stance, you can take any shape and 
set HCOLOR to 0-7 and draw thè 
shape in that color. But if you’re us- 


Listing continued. 

2000 SOI = 2364 - (NU * 2) - 2: POKE SOI,NU 
2005 IF NB = 1 THEN POKE SOI + 2,(NU * 2) +2 

2010 ADR = SOI 

2011 IF NB = 1 AND NU < >2 THEN RETURN 

2012 WQ = WQ 4 2 

2015 IF <<LC - SOI) + 1) > 255 THEN 2030 
2020 POKE SOI 4 WQ,(LC - SOI) + 1 
2022 POKE SOI + WQ 4 1,0 
2025 RETURN 

2030 GG = INT ( ( (LC - SOI) + 1) / 256) 

2040 POKE SOI 4 WQ + 1, GG 

2050 HH = ((LC - SOI) + 1) - ( INT ( ( (LC - SOI) + 1) / 256) * 256) 

2060 POKE SOI 4 WQ,HH 
2070 RETURN 

2100 SOI = 2364 - (NU * 2) - 2: POKE SOI,NU 

2101 IF AF = 1 THEN RETURN 

2102 IF AF = 0 THEN AF = 1 

2103 IF NU = 2 AND NB = 1 THEN RETURN 

2105 IF NB = O THEN POKE SOI 4 1,0* POKE SOI + 3,0: POKE SOI + 2,(NU * 2 

) -*- 2: RETURN 

2106 NB = NB + 1: GOSUB 2000:NB = NB - 1 
2110 RETURN 

2300 LOC = LOC - 1: POKE L0C,0:BYTE = BYTE - (BYTE > O)« HGR : ROT= O: SCALE= 
1: HCOLOR= 3 

2301 LL = FRE (O) 

2303 GOSUB 2100 

2305 C(l) = 0:C(2) = 0:C(3) = 0:N = O 

2308 D = INT (SOI / 256):T = D * 256:SM = SOI - T 

2310 POKE 232,SM: POKE 233,D: DRAW NB + 1 AT 139,79 

2325 DX = XX(BYTE - BE - 1):OLDY = YY(BYTE - BE - 1):X = XX(BYTE - BE - 1) 

:Y = YY(BYTE - BE - 1) 

2327 IF LF < >1 AND K9 / 2 = INT (K9 / 2) THEN DX - XX(BYTE - BE - 2): 

OLDY = YY(BYTE - BE - 2): X « XX(BYTE - BE - 2):Y = YY(BYTE - BE - 2) 

2329 GOTO 199 

2330 IF (K9 / 2 = INT (K9 / 2) AND KK = 215) AND K8 = 215 THEN 2340 

2335 IF K9 / 2 < > INT (K9 / 2) THEN 2340 

2338 RETURN 

2340 ON K9 GOTO 2370,2399,2350,2399,2350,2399,2370,2399 
2350 C(N) = O:Y = OLDY - 1: GOSUB 580: RETURN 

2370 C(N) = 2:Y * OLDY + 1: GOSUB 580: RETURN 

2399 GOSUB 2500: GOTO 200 

2400 HGR : ROT= O: SCALE= 1: HCOLOR= 3: POKE LDC,0: POKE 232,SM: POKE 233 
,D: DRAW NB + 1 AT 139,79 

2410 RETURN 

2500 ON K9 / 2 GOTO 2510,2520,2530,2540 

2510 X = DX - 1 :C(N) * 1: GOSUB 560: RETURN 

2520 Y = OLDY - 1:C(N) = O: GOSUB 560: RETURN 

2530 X = DX + 1:C(N) = 3: GOSUB 560: RETURN 

2540 Y = OLDY 4 1:C(N) =2: GOSUB 560: RETURN 

2730 ON K8 GOTO 2370,2740,2350,2740,2350,2740,2370,2740 

2740 RETURN 

3000 IF K9 = 1 AND (KEY > 201 AND KEY < 205) THEN 3010 

3001 IF K9 = 3 AND (KEY > 201 AND KEY < 205) THEN 3020 

3002 IF K9 = 5 AND (KEY > 201 AND KEY < 205) THEN 3030 

3003 IF K9 = 7 AND (KEY > 201 AND KEY < 205) THEN 3040 

3004 IF (K9 = 7 OR K9 = 1) AND (KEY = 201 OR KEY = 205) THEN OLDY = OLDY + 

1: GOTO 899 

3006 IF (K9 = 3 OR K9 = 5) AND (KEY = 201 OR KEY = 205) THEN OLDY = OLDY - 
1: GOTO 899 
3008 GOTO 855 

3010 DX = DX + 2:Y = Y + 1: GOTO 899 

3020 DX - DX - 2:Y = Y - 1: GOTO 899 

3030 DX = DX + 2:Y = Y - 1: GOTO 899 

3040 DX = DX — 2:Y = Y + 1: GOTO 899 

3999 RETURN 

4800 IF TT > 1 THEN 4810 
4805 RETURN 

4810 IF N > 1 THEN N = N - 1 
4820 RETURN 
5000 PRINT N* 

6000 PRINT "A"; SOI 

7000 PRINT "L";(LOC + 2) - ADR 

7500 PRINT “NUMBER OF SHAPES (NOW OR FUTURE):";NU 
8000 POKE - 16368,0: GOSUB 23000 

8002 CALL - 936: FLASH : PRINT "NOW SWITCH BACK TO PROGRAM DISK!": NORMAL 
: GOSUB 23000 
8010 D* = CHR* (4) 

8020 PRINT D$;"RUNMENU" 

15080 DX = DX + 2:X = X - 1: GOSUB 2: GOTO 199 

15082 DX = DX - 2:X = X + 1: GOSUB 2: GOTO 199 

15084 DX = DX - 2:X = X - 1: GOSUB 2: GOTO 199 

15086 DX = DX + 2:X = X + 1 : GOSUB 2: GOTO 199 

16000 SA = C(2):C(3) = O: GOSUB 635: RETURN 

18999 FLASH 

19000 PRINT PRINT "“: CALL - 936: VTAB 21:FA = 1: PRINT "YOU'VE REAC 

HED 990 BYTES. THE LIMIT IS": PRINT "1000. AT 1001 THE PROGRAM WILL B 
OMB, SO" 

19002 PRINT "QUIT AT 1000. HIT C 7 TIMES TO CONTINUE": GOSUB 23010: GOSUB 
23010: GOSUB 23010: GOSUB 23010: GOSUB 23010 

19003 GOSUB 23010: GOSUB 23010: CALL - 936 

19004 NORMAL : GOTO 170 

20000 BYTE = BT:LOC = LI: CALL - 936 

20001 IF AF = 1 THEN AA = 1 

20010 IF NB = 0 THEN BYTE = O 

20020 IF NB = 0 THEN LOC = 2363 

Listing continued. 
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X Coordinate in XDRAW 

Background color 

Shape color 

1. odd 


whitel 

violet 

2. even 


whitel 

green 

3. odd 


blackl 

green 

4. even 


black1 

violet 

5. odd 


green 

blackl 

6. even 


green 

whitel 

7. odd 


violet 

whitel 

8. even 


violet 

blackl 

9. odd 


white2 

blue 

10. even 


white2 

orange 

11. odd 


black2 

orange 

12. even 


black2 

blue 

13. odd 


orange 

black2 

14. even 


orange 

white2 

15. odd 


blue 

white2 

! 16. even 


blue 

black2 


Table 1. Examples of color shape creation. 




ing XDRAW, this won’t work. (Peo- 
ple generally use XDRAW so they 
won’t mess up thè background; by 
XDRAWING twice thè entire scene 
will be left as it was before you drew 
on it.) 

So how will you XDRAW in col- 
or? The way MDRAW is set up, it 
draws in thè color opposite that of 
thè background color. Use XDRAW 
for a white shape on a blaek screen 
and you’ll get a white shape; use 
XDRAW for a white shape on a 
white screen, and you’ll get a black 
shape. At first thought you may fig¬ 
ure that you’re stuck with uncolored 
shapes with XDRAW. Not so. It’s 
true that you can’t use HCOLOR 
commands with XDRAW, but who 
needs to? Simply draw thè shape in 
color to begin with when using my 
shape-drawing utility. How can you 
do this? Well, it has nothing to do 
with setting HCOLOR in my draw- 
ing program. 

The way you do it is quite simple: 
Simply leave out every other column 
of dots when you draw thè shape 


(see Figure 4). Then you’ll be able to 
XDRAW thè shape in any of thè 
colors. 

In a more complex shape, simply 
draw it on graph paper and erase 
every other vertical column of dots 
all thè way through thè drawing 
(put one dot in each tiny graph 
square). 


But how do you get all thè Apple’s 
colors when using XDRAW to create 
such a shape? Simple—it depends 
whether your initial vector-shape 
reference point was or was not on 
one of thè erased columns on thè 
graph paper. 

Examples using ah initially green 
shape with odd X-coordinate refer¬ 
ence points are shown in Table 1. 

If thè table referred to a green 
shape with an even X-coordinate 
reference point rather than an odd 
one, you’d have to reverse all thè 
odds and evens in thè first column to 
make it correct. 

In using vector shapes, you might 
wish to use thè collision counter in 
address location 234($EA). To do so 
you must first know thè number of 
dots in thè shape involved (draw thè 
shape on a black background on a 
black and white monitor). Suppose 


• • • • • 

• • • 

• • • • • 

• • • 

• • • • • 

• • • 

• • • • • 

• • • 

Figure 4. To create 

a color ed shape, just 

leave out every other column of dots when 
you draw thè shape. 
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20030 

GOTD 488 



23000 

NORMAL 



23005 

PRINT : PRINT “HIT ANY KEY TO CONTINUE:”: PRINT 



23010 

PK - PEEK ( - 16384): IF PK > 127 THEN 23030 



23020 

GOTO 23010 



23030 

POKE - 16368,0: RETURN 



25000 

IF BYTE < 2 THEN 200 



25010 

GOSUB 32000 



25020 

SG * 1 



25040 

HCOLOR- 0: HPLOT DX,OLDY: HCOLOR» 3 



25070 

DX = OXjOLDY = OY 



250B0 

IF KK » 3 THEN 15080 



25082 

IF KK = 5 THEN 15082 



25084 

IF KK = 1 THEN 15084 



25086 

IF KK = 7 THEN 15086 



25090 

GH = 1 



25099 

GOTO 199 



31000 

IF SG = 2 THEN KK = K1 



31020 

IF SG = 2 THEN SG = 0 



31030 

IF SG » 0 THEN 204 



31040 

IF SG * 1 THEN K1 * K9 



31050 

IF SG = 1 THEN K9 = KK 



31060 

IF SG = 1 THEN SG » 2 



31070 

GOTO 204 



32000 

IF N = 0 THEN 32020 



32010 

IF N > 1 THEN N - N - 1 



32015 

C(N) = 0: GOSUB 4800: RETURN 



32020 

BYTE » BYTE - 1:L0C * LOC - liC(l) » C1:C(2> » C2:C(3) = 0:N = 

TN 

32030 

PRINT 



32040 

FF » 0:SV = 0:TT = 0: RETURN 



63990 

PRINT CHR* (7>: POKE - 16303,0: POKE - 16298,0: 

VTAB IO:KO 

» PEEK 

(222): PRINT ”ERROR_THE ERROR CODE IS: "KO: POKE 

- 16368,0: 

GOSUB 

23000: POKE - 16304,0: POKE - 16297,0 



63991 

POKE 216,0 



63992 

ONERR GOTO 63990 



63993 

IF KO = 53 THEN 20000 



63995 

IF KO * 254 THEN POKE - 16303,0: POKE - 16298,0: 

GOTO 1 


63999 

GOTO 200 
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CREATE PROFESSIONAL PRESENTATIONS of 
inlermixed hi-res, lo-rcs and text frames. Easy-to- 
usc and FAST— hi-res images load in 2 l k- 
seoondsl Paddles or Keyboard- advance frames in 
forward or reverse. 

UNATTENDED SHOWS are possible with each 
frame individually pre-programmed to appear on 
thè screen from 1 to 99 seconda. 

TEXT SCREEN EDITOR lets you create your 
own b/w text “slides”. Add type “live” from thè 
; keyboard during presentations if you want. 

DISPLAY MODULE: Send entire presentations- 
: on-disk to your friends and associates. 

FRAME-UP: $29.50 

(Include» Peeks/Pokes Ctìart) 

Apple Mechanic 

SHAPE-WRITER/BYTB ZAP DISK 
BY BRUT KB BABY 

SHAPE EDITOR: Keyboard-draw shapes for hi- 
res animation in your programs. Design propor- 
tionally-spaced typefaces with special 
characters. 6 fonts on thè disk. Listable demos 
show how to use shape tables to animate games, 
graphics and professional Charts & Grapfis. 

BYTE-ZAP: Rewrite any byte on a disk for repair 
or alteration. Load entire sectors on thè screen 
for inspection. Hex/Dec/Ascii displays and input 
Complete instructions for making trick file 
names, restoring deleted files, etc. 

MORE: Useful music, text and hi-res tricks for 
your programs. Educational documentation. 
APPLE MECHANIC: $29.50 

(Include, Peeks/Pokes Chart 4 Tip Book#5) 

Typefaces 

_ FOR APPLE MECHANIC _ 

26 NEW FONTS for Apple Mechanic’s Xtyper 
and Hi-Writer programs. Most are full 96-charac- 
ter fonts, large & small, of fully-editable charac¬ 
ters. (Apple Mechanic required) 

BEAGLE MENU: Use with your disks. Display 
only thè fllenames you want (e.g. only Applesoft 
files or only Locked files) for one-key cursor 
selection/execution. Space-on-disk, catalog 
scan, optional sector-number elimination. 

TYPEFACES (or Apple Mechanic: $20.00 

(Includo» Peeks/Pokes Chart & Beagle MenuUtility) 


EARLY 

MICRO 

PROCESSOR 


Beagle Bag ^ 


ìa-OAMES-PLUB OH ONE DISK 
BYBBRT KB BABY 

TWELVE GREAT GAMES from thè classic Bea¬ 
gle Bros collection— TextTrain, Slippery Digita, 
wowzo, Magic Pack, Buzzword... Almost all ofour 
“Game Pack” games, updated and re-released on 
one jam-packed, entertaining unprotected disk. 

COMPARE BEAGLE BAG with any one-game 
locked-up game disk on thè market today. All 12 
games are a blast thè price is right thè ìnstruc- 
uons are crystal clear. AND thè disk is copyable. 
You can even change thè programs or list themto 
LEARN, and see what makes them tick. 

BEAGLE MENU TOO: See “Typefaces” above. 

BEAGLE BAG: $29.50 

(Include» Peeks/Pokes Chart A Beagle Menu Utility) 



PRINT VARIABLE-WIDTH TEXT on thè hi-res 
screens with normal Applesoft commands 
(including Htab 1-70). Normal, expanded A com- 
pressed text on sanie screen— no hardware! 

ADD GRAPHICS TO TEXT ór vice-versa. Run 
existlng programs under Flex Text control. Easy 
to use and compatitale with PLE© and GPLE.© 

DOS TOOL KIT© FONT compaiibility, or use 
Flex Text fonts. Select up to 9 fonts with ctrl-key 
commands. Print/List/Catalog in any style! Cus- 
tom TEXT CHARACTER EDITOR included. 

FLEX TEXT: $29.50 

(include* Peeks/Pokes Chart; requlres monito!) 

Utility City 

81 UTILITIES ON ONE DISK 
_ BY BBBT KB BABY _ 

LIST FORMATTER prints each program state¬ 
ment on a new line. Loops indented with printer 
page breaks. A great de buggeri Al so... 

MULTI-COLUMN cataloga for printouts, auto¬ 
post Run-number & Date in programs, put invisi- 
ble commands in programs, create INVISIBLE file 
names, alphabetize/store info on disk, convert 
decimai to hex or INT to FP, renumber to 65535, 
append programs, dump text screen to printer... 

MORE TOO: 21 Programs Total, a best-seller! 

UTILITY CITY: $29.50 

(Includes Peeks/Pokes Choit & Tip Book#3) 



10 FOR A = 1 TO 22: PRINT CHR$(ASC (MID$( 
“IJ—MPX(TIZPVS!TJTUFS@", A, 1 ))—A/A); 

20 FOR B = 1 TO 4: C = PEEK(49200): NEXT B, A 

DOS Boss 

DISK COMMAND EDITOR 
BY BERI KBBSBY & JACK CASSEDY 

RENAME COMMANDS Se ERROR MESSAGES: 
“Catalog” can be “C”; “Syntax Error” can be 
“Oops” or anything you want. Protect your pro¬ 
grams; unauthorized saveattempt can produce 
Not Copyable” message. Also UST-prevention 
and onekey program-run from catalog 

CUSTOMIZE DOS: Change Disk Volume head- 
ing to your message Omit/alter catalog file codes. 
Fascinaiing documentation and tips; hours of 
juicy reading and Apple experiments. 

ANYONE USING YOUR DISKS (booted or not) 
will be formatting DOS thè way you designed it 

DOS BOSS: $24.00 

(Include» Peeks/Pokes Chart & Tip Book#2) 


Tip Disk* 1 

100 TIP BOOK TIPS ON DISK 
_ BY BBBT KB BABY _ 

100 LISTABLE PROGRAMS from Beagle Bros . 
Tip Books 1-4. Make your Apple do ttungs its | 
never done! All programs changeable for experi-i 
mentation. Includes our Apple Command Chart: I 
ALL Applesoft, Integer & DOS Commands! | 
TIP DISK#1: $20.00 

(Include» Peeks/Pokes and Apple Command Charts) I 


SINCE I GOT MY 
BEAGLE BROS COMMAND 
CHART, IVE ACOUIRED 

NEW VIM AND VIQOM J 



^ ProntoDOS 

” HIGH-SFEBD DISK UTILITY 
_ BY TOM WBIBHAAB. _ 

HIGH-SPEED DOS! Take a look— 

Function.Normal Pronto 

BLOAD HI-RES IMAGE.10 sec. 3 see 

BSAVE HI-RES IMAGE.12 see 6 see 

LOAD 60-SECTOR PROGRAM ... 16 see 4 see 
SAVE 60-SECTOR PROGRAM .24 see 9 see 

BLOAD LANGUAGE CARD.13 see 4 see 

TEXT FILES. (no change) 

BOOT PRONTO DOS or any updated normal-3.3 
disk. Create new ProntoDos disks with thè nor¬ 
mal INIT command. ProntoDos is compatitale with 
ALL DOS COMMANDS and performs normally 
with almost ALL programs, including CopyA. 

MORE DISK SPACE: ProntoDos frees-up 15- 
extra-sectors per disk, almost one filli track! 

PRONTO-DOS: $29.50 

(Includes Peeks/Pokes Chort) 

Alpha Plot 

HI-RES GRAPHICS/TBXT UTILITY 
BY BBBT KERflEY JACK CAS8IDY 

DRAW IN HI-RES, on 2 pages, using keyboard or 
paddles/joystick. See lines before plotting. 
Mixed-colors and reverse (background opposite). 
Fast circles, boxes and ellipses; filled or outlined. 

COMPRESS HI-RES PIX to 1/3 Disk-Space. 
Superimpose pages or re-locate any rectangular 
image area anywhere on either hi-res page 
HI-RES TEXT: Proportional spadng adjustable 
character size and color, upper/lower case, no tab 
limits, sideways typing for graphs. 

ALPHA PLOT: $39 A0 

(Includes Peeks/Pokes Chart A Tip Book#4) 






(ajn ujnsolicìted endorsement) 


“APPLE” is a 
registcred 
trade mark of 
You-Know-Who. 


Where to Buy Beagle Bros Disks: 

MOST APPLE DEALERS carry Beagle Bros software. 
If yours doesn’t get on his case. Or order directly 
from us for IMMEDIATE SHIPMENT— 


Visa/MasterCard/COD, caU TOLL FREE: 
Nationwide: 1-800-854-2003 ext 827 
California: 1-800-522-1500 ext 827 
Alaska/Hawaii: 1-800-854-2622 ext 827 

OR mali U.S.check, money-order or Visa/MC #, s 
to BEAGLE BROS, Dept I 
4315 SIERRA VISTA / SAN DIEGO, CA 92103 

Please add $1.50 First Class shipping any size order. 
Overseas add $4.00. COD add $3.00. California add 6% 
ALL ORDERS SHIPPED IM ME DIATE LY. 
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Program listing 2. Vedor shape conversion program. 

O ONERR GOTO 63990 

1 TEXT : HOME : VTAB 1: PRINT "IF YOU DON’T WANT TO ERASE, HIT SPACE BA 

R NOW!!!": GOSUB 63000: IF P = 160 THEN 5 

2 HGR 

5 TEXT : HOME : INPUT "HPLOT SHAPE WANTED? (Y/N) (IF YOU DON'T TYPE Y YOU 

’LL GET BLOCK SHAPE DRAWING ROUTINE): ";AN*: IF LEN ( AN*) = O THEN 
5 

6 D* = CHR* (4): PRINT : INPUT “WANT TO PDL—DEFINE WHAT’S ON SCREEN NOW W 

ITHOUT LOADING IN SHAPES? <Y/N):";Q*: IF LEN (Q*) - O THEN 6 

7 IF ASC (□♦> = 89 THEN 47 

10 DJ = CHR* (4): IF ASC (AN*) < >89 THEN PRINT D*"BLOADTESTTB": GOTO 

20 

15 PRINT D*“BLOADTEST O (CALL2048)" 

20 TEXT : HOME : VTAB 21 « INPUT "SHAPE TABLE NAME: ";ST*: IF LEN (ST*) = 

O THEN 20 

30 PRINT x INPUT “SHAPE #: "jSN: IF SN > 23 OR SN < 1 THEN 30 
35 POKE 7,SN 

40 IF ASC (AN*) = 89 THEN 43 

41 PRINT i PRINT "DON’T LET UPPER LEFT CORNER DOT BE LESS THAN 7...": PRINT 

"KEEP HL GREATER THEN 0."* GOSUB 63000 

42 PRINT : INPUT "VT: "jVT: INPUT “VB: “;VB: INPUT "HR: ";HR: INPUT "HL: 

" ; HL: POKE 252,VT: POKE 253,VB: POKE 254,HR: POKE 255,HL 

43 PRINT : FLASH : PRINT "SWITCH TO SHAPE DISK!": NORMAL : GOSUB 63000 

45 PRINT D*"BLOAD";ST*: AD = PEEK <43634) + PEEK (43635) * 256:L - PEEK 

(43616) ♦ PEEK (43617) * 256: PRINT “ADDRESS: "AD: PRINT "LENGTH: “L 

46 GOSUB 2000 

47 POKE - 16303,0: POKE - 16298,0: HOME : VTAB 1: PRINT "USE THE PADDLE 

S TO MOVE THE DOT TO THE UPPER LEFT RECTANGLE POINT. HIT PDL O BUT 
TON. THEN MOVE THE DOT TO THE LOWER RIGHT RECTANGLE POINT. HIT PDL 1 
BUTTON.": GOSUB 63000 

48 POKE 232,250: POKE 233,0: SCALE» 1: ROT» 64: POKE 250,1: POKE 251,0: POKE 

252,4: POKE 253,0: POKE 254,7: POKE 255,0 

49 POKE - 16304,0: POKE - 16297,0 

50 HOME : PI = PDL (1): IF PI > 159 THEN 50 

51 POKE 2300,1: POKE 2301,0: POKE 2302,4: POKE 2303,0 

55 PO = PDL (O): XDRAW 1 AT PO,PI:XX = PO:YX = PI 

60 PI = PDL (1): IF PI > 159 THEN 60 

65 FOR QW = 1 TO 200: NEXT : HOME : VTAB 21: PRINT "X: "PO: PRINT "Y: "PI 

70 PO = PDL (O): XDRAW 1 AT XX, YX: XDRAW 1 AT PO, PI: XX * PO: YX * PI 

80 BO = PEEK ( - 16287): IF BO > 127 AND FL = O THEN FL = 1 : GOTO ÌOO 

85 B1 = PEEK ( - 16286): IF B1 > 127 AND SG = 0 THEN SG = 1: GOTO 110 

90 GOTO 60 

100 VT = PI :HL = PO: PRINT CHR* (7): IF SG * 1 THEN 120 
105 GOTO 60 

110 VB = PI :HR = PO: PRINT CHR* (7): IF FL = 1 THEN 120 

115 GOTO 60 

120 XDRAW 1 AT PO,PI 

155 HCOLOR» 3 

160 HPLOT HR,VT TO HR,VB TO HL,VB TO HL,VT TO HR,VT 
170 IF ZQ = 1 THEN RETURN 
175 VTAB 21 

180 PRINT : INPUT "IS THE RECTANGLE DONE O.K.? (Y/N):";A*: IF LEN (A*) = 

O THEN 180 

185 IF ASC (A*) = 78 THEN SG = O: HCOLOR» 0:FL = O:ZQ = 1: GOSUB 160:ZQ = 

O: HCOLOR= 3: GOTO 50 
190 ZQ = 1: HCOLOR» 0: GOSUB 160:ZQ = O 
330 R = 1:FL = O 

340 Y = VT:X = HL - 1:LOC = 2304 

350 X = X + 1: IF X > HR THEN B = 2: GOSUB 500: GOTO 480 
360 XDRAW 1 AT X,Y:B = 1: IF PEEK (234) = O THEN B * 5 
370 X = X + 1 : IF X > HR THEN BB = 16: GOSUB 500: GOTO 492 
380 XDRAW 1 AT X,Y:BB = 8: IF PEEK (234) » O THEN BB * 40 
390 X = X + 1: IF X > HR THEN MB = 128:FL = 1: GOSUB 900: GOTO 460 
400 XDRAW 1 AT X,Y:MB » O: IF PEEK (234) = O THEN GOSUB 900: XDRAW 1 AT 
X,Y: GOTO 360 

410 MB = 64: GOSUB 900: GOTO 350 

450 X = X — 1: IF X < HL THEN B = 2: GOSUB 500: GOTO 380 
460 XDRAW 1 AT X,Y:B = 3: IF PEEK (234) = O THEN B - 7 
470 X = X — 1: IF X < HL THEN BB = 16: GOSUB 500: GOTO 400 
480 XDRAW 1 AT X,Y:BB = 24: IF PEEK (234) = O THEN BB = 56 
490 X = X — 1 : IF X < HL THEN MB = 128:FL = 1: GOSUB 900: GOTO 360 
492 XDRAW 1 AT X,Y:MB = O: IF PEEK (234) = O THEN GOSUB 900: XDRAW 1 AT 
X,Y: GOTO 460 

494 MB = 192: GOSUB 900: GOTO 450 
500 Y = Y + 1: IF Y > VB THEN ÌOOO 
505 R = NOT R 
510 RETURN 

900 BY = B + BB + MB: POKE LOC,BY:LOC = LOC + 1:B * 0:BB * 0:MB = O 
905 IF FL = 1 THEN FL = O: GOSUB 500 
930 RETURN 

1000 POKE 232,252: POKE 233,8: ROT» O: SCALE» 1 

1005 POKE LOC,O: POKE LOC ♦ 1,0 

1010 XDRAW 1 AT 140,79 

1015 HOME :SG = 0:FL = O 

1020 VTAB 21: GOSUB 63000 


Listing continued. 


shape #1 has 24 dots. From then on, 
every time you XDRAW 1 at what- 
ever coordinates you’ll also do thè 
following: 

IF PEEK (234)024 THEN GOSUB 1400 

We’ll assume that at line 1400 you 
have a subroutine to handle colli- 
sions. Perhaps a machine-language 
sound is called as well as a graphics 
animation sequence that displays 
three different explosion shapes in 
Vi of a second, sequentially. 

Well, we’ve looked at creating 
vector shapes from scratch and hav- 
ing them appear white, black or col- 
ored with DRAW or XDRAW. But 
what if you want part of a scene, or 
an hplot shape, or a block shape, to 
be converted to a vector shape so you 
can DRAW, XDRAW, ROT and 
SCALE with it? What kind of pro¬ 
gram would make such a conver¬ 
sion? See thè following listing for thè 
answer. The program sends thè cur- 
sor through thè entire block in which 
a shape exists, and finds out, one bit 
(dot) at a time, whether or not that 
bit is turned on. If it is, thè program 
turns this fact into vector shape table 
data bytes. 

The dot-cursor starts at thè top of 
thè shape and goes dot by dot hori- 
zontally until it reaches thè far side 
of thè block (previously indicated by 
user-controlled game-paddle move- 
ments that let you mark thè upper 
left and lower right corners of thè 
shape block), after which it moves 
down a line, reverses direction, and 
again traverses thè shape horizontal- 
ly. This continues until thè bottom 
of thè shape block has been reached. 

The secret to how I detected an 
on-bit is in thè IF PEEK(234)=0 
statement found from lines 360 to 
492. Yup, thè collision counter 
again! You see, if my one-dot shape 
is XDRAWN on a blank screen, thè 
counter at location 234 will be one, 
meaning that one dot was drawn 
okay. But if 234 contains a 0, it 
means that thè dot was XDRAWN 
on top of another dot; in XDRAW, 
dot-on plus dot-on equals dot-off. 

XDRAW uses 6502 instruction 
EOR in which 0 and 1 = 1,1 and 
1 = 0, and 0 and 0 = 0. In other 
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Aprii 15th is just 
around thè 
corner 



The ACCOUNTANT 

Finance Data Base System 

Optional VisiCalc™ Interface Available 

BE A MONEY MASTER 

Define up to 63 tax codes and save when you prepare 
your retums. Available for APPLE™ and IBM™PC. 

“Among bookkeeping programs, Decision Support 
Software’s ACCOUNTANT ($129) earns high marks 

and is easy to USe. M —Money Magazine, Nov. 1982 

( 800 ) 368-2022 

Decision Support Software 

1438 Ironwood Drive. McLean, VA 22101 (703) 241-8316 

Aòd $3 00 shippmg and handiing. Virginia residents add 4% 

ARPIE' IBM', and VisCalc' art trademartis o» APPLE Computar, Ine IBM Cwp , and VnrCorp, Ine rtsp«:tivaty 


YOU’VE JUST F0UND 


THE MISSING LINK! 



Computer Shopper is your link to individuals who buy, sell and trade computer 
equipment and software among themselves nationwide. No other magazine fills 
this void in thè marketplace chain. 

Thousands of cost-conscious computer enthusiasts save by shopping in Computer 
Shopper every month through hundreds of classified ads. And new equipment 
advertisers offer some of thè lowest prices in thè nation. 

Computer Shopper’s unbiased articles make for some unique reading among 
magazines and there’s a "help” column to answer difficult problems you may 
have with interfacing, etc. 

For a limited time you can subscribe to Computer Shopper with a 6 month trial 
for only $6 or 12 months for only $10. MasterCard & VISA accepted. 

6 month trial, $ 6 or 12 months for only $ 10 


COmPUTSR SHOPPER 

P.O. Box F590»Titusville, FL 32780 

305-269-3211 
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This Tax Program will 

NOT ONLY SAVE YOU TIME, 

It will save you Money. 


For your Apple™ II, Apple 11+, 
Apple Ile, Apple ///, IBM PC™, 
TRS-80™, and your Visicalc ™. 

With The Tax-Templates™ you don’t have 
to spend an arm and a leg to hopefully 
save a couple of bucks. For just $89 95 
you get instructions and templates for 
your 1040, Schedules A, B, C, D, E, G, 
SE, ES, W, and Investment Tax Credits, 
Energy Credits, Child Care Credits and 
much, much more. 

It’s current and it’s good. The Tax- 
Templates™ author Barry D. Bayer is 
also thè noted author of thè monthly 
column Visulating in Desktop 
Computing and has written many 


articles for The Apple Orchard, 
InfoWorld, Creative Computing and 
Microcomputing. 

It will organize, categorize and calculate 
your taxes thè way many CPAls do. 

And just in case you want to nitpick a 
fine point in an IRS ruling, that low 
$89 95 includes thè 1982 edition of 
J. K. Lasser’s 328-page hook, Your 
Income Taxes. 


Thè®!»* * ★ * 

Templates 


All you need is your computer, a 
VisiCalc™ program and thè simple 
desire to keep your taxes and tax 
preparation time to a minimum. 

Please don’t wait until Aprii 14 to order. 

«OA/VV 3 

OMEGA MICROWARE, INC. 

222 SO. RIVERSIDE PLAZA 
CHICAGO, IL 60606 
(312) 648-4844 

MasterCard and Visa holders order ''N 

toll-free 1-800-835-2246 ) 


Dealer inquiries invited. Purchase of this program may be considered a tax preparation related expense. Apple is a registered trademark of Apple Computer, Ine IBM PC is a registered 
trademark of IBM Corp., TRS-80 is a registered trademark of Radio Shack, VisiCalc is a registered trademark of VisiCorp, Ine., The Tax-Templates and Omega MicroWare are trademarks of Omega Microware, Ine. 

© 1982 Omega MicroWare, Ine. 
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Fudge It! 


Listing continued. 



1025 

TEXT 



1030 

PRINT "ADDRESS 

OF 1—SHAPE INDEX: 2300 (DEC.) ADDRESS 

OF START OF S 

HAPE 2304":LN = 

LOC - 2304:LT = LOC - 2300: PRINT "LENGTH OF TABLE: " 

LT: PRINT "LENGTH OF SHAPE: M LN 


1040 

GOSUB 63000: HOME : VTAB 1: INPUT "DO YOU WANT ANOTHER 

CONVERSION? ( 

Y/N):";AS*: IF 

LEN (AS*) = 0 THEN 1040 


1050 

IF ASC (AS*) 

= 89 THEN 20 


1055 

PRINT : PRINT 

"HIT RESET AND THEN BSAVE A VECTOR SHAPE 

IF DESIRED.": 


GOSUB 63000 



1060 

END 



2000 

IF ASC (AN*) 

< >89 THEN CALL 2116: RETURN 


2005 

HCOLOR= 3 



2010 

CALL 2048: RETURN 


63000 

PRINT : PRINT 

"(HIT ANY KEY TO CONTINUE):": PRINT 


63010 

P = PEEK ( - 

16384): IF P > 127 THEN POKE - 16368,0: 

RETURN 

63020 

GOTO 63010 



63990 

POKE 216,0 



63991 

ONERR GOTO 63990 


63992 

IF PEEK (222) = 254 THEN RÉSUMÉ 


63995 

GOTO 0 




words, you get an on (one) dot only 
if thè two bits that went into that dot 
are different. By “two bits that went 
into,” I mean that thè background 
bits were already there—all thè bits 
in thè bytes from locations 8192 to 
16383 (actually not all these bytes 
are used on thè screen, but most are) 
are thè screen background. But 
when you XDRAW a shape on top of 
those background bits, you’re super- 
imposing two bit-sources and get- 
ting a result on thè screen that is 


“background plus shape.” So when 
XDRAW puts one bit from a shape 
onto one bit from thè background, 
thè 0 and 1 = 1 would mean 
XDRAW puts a dot shape on a blank 
screen, while thè 1 and 1 = 0 means 
it is put on a part of thè background 
that had an on-bit. Consider thè 
shape to convert (to a vector shape) 
as thè background. Consider thè 
dot-shape placed by thè XDRAW 
command all over this background 
as thè shape. Listing 2 for this utility 


gives thè program to convert to vec¬ 
tor shape. 

When thè program prompts 
you with 

IF YOU DON’T WANT TO ERASE, HIT 
SPACE BAR NOW! 

do it. For thè time being we’ll assume 
that you have put something on high- 
resolution page 1 before you ran this 
program, and that you want to save 
it, or part of it, as a vector shape. 

Also, when thè program asks 
about hplot shapes, tvpe N for no. 
And when you’re asked whether 
you’d like to paddle-define what’s on 
thè screen now, without loading in 
shapes, type Y for yes. 

Next month I’il present programs 
to help you load either hplot or 
blockshapes in this program, and to 
display them, after which you can 
convert them to vector shapes. But 
next month’s main focus will be 
hplot shapes, color and adventure 
games. See you then! ■ 
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• Single Switch Control of CPU and Peripherals 

• Built in Circuit breaker protects your System 

• Four power expansion outlets 

• Optional power surges ($39 ) and fan ($39) 
available 

» Compatible with IBM, APPLE,TRS-80 and others 

Ordering or Dealer Info 
800 - 343-4311 

Master Charge and Visa Accepted 

CAB-TER, Ine. 

Riverside St., Nashua NH 03062 

CIVILIZING COMPUTERS 

ACOUSTIC ENCLOSURE $ 99! 
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Compatible 


For high resolution (560H X 240V) color graphics, you cani 
beat thè Amdek Color ii Monitor. And if you’re looking for 
economy, thè Color ili Monitor with 260H X 300V 
resolution is a superò buy. 

Both monitors feature RGB video input for computer control- 
led color ... and Amdek’s easy-to-install Digital Video Multi- 
plexor (DVM) board permits interface with thè most popular 
80column boards. 

Just cali, or write for full details. 


Color ii Monitor has RGB input and 560(H) X 240(V) 
line resolution. 

Color ili Monitor has RGB input and 260(H) X 300(V) 
line Resolution. 

Digital Video Multiplexor (DVM) assures color graphics 
interface with most popular 80 column boards, such as. 
Videx “Videoterm”, Advanced Logic “Smart-term”, 
M&R “SUP ‘R’ TERMINAL”, Bit-3 Computer Corporation 
“FULL VIEW-80”, and thè “Doublevision” boards. 


2201 Lively Blvd. • Elk Grove Village, IL 60007 
(312)364-1180 TLX: 25-4786 


CORP 


Amdek. . . your guide to innovative computing! 


Circle 95 on Reader Service card. 


. . . for demanding graphics 
or text display. 
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by Bill O’Brien 


Basic(s) Contìnued 

?SYNTAX ERROR and you can’t blame it on thè com- 


?TYPE MISMATCH ERROR 
PREENTER 

W hat’s this? Do we have three 
choices for a subtitle this 
month? Not really. Last time we 
looked at a small Basic program that 
illustrated some of thè handling abili- 
ty of Apple’s Business Basic (a 
Microsoft Basic). I imagine typing in 
thè program might have resulted in 
one or more of thè messages above. 

Now, you can understand that if 
you typed in, “I is here,” you might 
get something called a syntax error, 
but that’s English. This is Basic! 
Well, it’s all thè same. Consider thè 
following: 

10 A = ((13*22)/(4 - 2))*(8 - 4)/12) 

20 PRINT A 

Never mind what it really means. 
What does it say to thè computer? It 
says PSYNTAX ERROR, and thè cul- 
prit is thè very first line, line 10. 
Counting thè left hand parentheses, 
you’ll find there are four of them. 
Let’s borrow a law of physics—for 
every action there is an equal and op¬ 
poste reaction. Count thè right hand 
parentheses. FU wager you found 
fi ve. A little lopsided, don’t you 
think? 

The Universe According to Basic 

The Eastern philosophies have thè 
yin and thè yang; Plato postulated 
thè world of forms to balance thè 
world of realities; programmers have 
four parens on one side and four on 
thè other to maintain thè harmonious 
equilibrium of Basic code. If you 
don’t, then you Ve violated one of thè 
rules of Basic statements and wreaked 
havoc with thè structure of thè line. 
That’s really what a syntax error is, 

Address correspondence to Bill O’Brien, 11 
Dongan Place, New York, NY 10040. 


puter. When you type in a line, any 
mistakes, such as an extra parens or a 
missing one, an IF not followed by a 
THEN or a string variable in an 
arithmetic function, will result in a 
PSYNTAX ERROR. 

The next message on thè error list is 
a bit tricky, because it involves thè 
way you handle data, rather than 
how carefully you type. 

10 A$ = ((12*4)/(6-2)) 

20 PRINT A$ 

Don’t start counting thè parens; 
they’re all right (this time, but as a 
generai rule check them). If you try 
to run this program I’il guarantee 
you’ll get a PTYPE MISMATCH er¬ 
ror. Why? 

‘ ‘For every action 
there is an 
equal and 

opposite reaction. ’ ’ 

Remember thè string variables I 
defined last month as groups of al- 
phanumeric characters? Unfortu- 
nately, line 10 is trying to define 
A-string (A$) as thè result of a numer- 
ic operation. It can’t be done. 

PREENTER is a type of error mes¬ 
sage that goes hand in hand with 
PEXTRA IGNORED. They both 
suggest fault with thè operatori in¬ 
put, but are actually based in pro¬ 
gram inadequacies. For instance: 

10 INPUT “How old are you:”;A 
20 PRINT A 

Running this program just thè way 
it is would not necessarily produce an 
error message, but consider thè possi- 
bilities. What type of a variable is thè 
program looking for? A number, or 
more precisely a numerai, such as 5. 
But, an innocent enough response 


would be five , an alphabetic string. 

If thè program asks for numeric in¬ 
put, but gets alphabetic or alphanu- 
meric, thè III will say to try 
again—to reenter. That is not really 
disastrous, but what if it is part of a 
nicely formatted screen? That error 
message will add two lines and there 
goes all your careful work. 

Now consider another seeming- 
ly harmless line that can cause 
problems. 

10 INPUT “City and State: ”;A$ 

After years of filling out envelopes, 
most people write New York, New 
York or, more generically, city- 
comma-state. Basic will, in response 
to such a line, accept thè first piece of 
data, print PEXTRA IGNORED and 
then indeed ignore thè remaining 
data. What first piece of data? The 
one before thè comma. 

Basic can request two answers 
(city, state) by phrasing thè statement 
INPUT “City and State: ”;A$,B$. 
The responses need only be separated 
by a comma. 

Okay then, you can just use thè 
two variable format and solve thè 
problem, right? Well. ... If you 
enter “New York New York”, know- 
ing thè comma will cause problems, 
Basic will accept thè response and 
then prompt with a question mark 
for thè second half. Any screen for- 
matting that is done will be again 
destroyed. 

There is a way out of it, but first I 
want to discuss attributes of various 
types of Business Basic variables. 
There are four types: reai, integer, 
long integer and string. 

Centsless Numbers 

Pick a number, any number at all. 
Does it have any decimai points? No? 
Then it’s an integer. If it had deci- 
mais, it would be reai. With Business 
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0RANGE16K 

Expands APPLE il usagefrom 48K to 64K. Functionally equiv- 
alent to thè Apple Language card. Provides 56K CP M wlth 
Microsoft's Softcard . 


ORANGE 80 

An 80 column by 24 line video display card for thè APPLE ir. 
Compatire with integer BASIC, Applesoft, Pascal and CP M . 
Features include: inverse and flashing video. Operates with 
monitors and most home black and white television sets. 


ORANGE KEYBOARDENCODER 

Provides true shift key operation for upper and lower case 
entry with auto repeat on every key. 60 programmed and 5 
user programable function keys. 


ORANGE ROMFONT BANK 

Enables thè APPLE II* to simultaneously generate and mix 
any 3 typefaces on thè text screen. 26 different romfont 
typeface chips available. 


ORANGE ROMFONTS 

Text screen character generator chips for APPLE ir com- 
puters. 26 typefaces available. All in full upper and lower 
case. 


ORANGE PROTO-BOARD 

A prototyping card for thè APPLE il * . ideal for thè hobbyist 
and hardware developer. 


ORANGE PAIR 

A z-80 card for thè Apple II. includes 64K of on board RAM. 
Multi tasking with Apple’s 6502 and 48K RAM allows I/O 
spooling with thè keyboard, printer and disk, compatible 
with Microsoft Softcard diskettes. Comes with CP M. 


See your locai grange dealer today. 







Available In Canada, USA, 
Hong Kong, Singapore, Australia and Japan 


Circuì Reador Soivic« i:ard 
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Basic you’re limited to integers be- 
tween 32767 and - 32768 and reai 
numbers between 1.7E38 and 
- 1.7E38. What’s an E doing in 
there? It stands for exponential, in this 
case plus or minus 1.7 followed by 38 
zeroes (1.7 times 10 to thè 38th 
power). A reai number less than .01 or 
greater than 999999.2 is expressed in 
exponential, or scientific, notation. 

What then, you say, is a long inte- 
ger? An ampersand (&) at thè end of 
a variable name tells thè III that this 
variable is an integer, but of a spe¬ 
cial type that may be up to 19 digits 
long (from 9223372036854775807 to 
-9223372036854775808). 

Famous Quotes 

A string variable, for all practical 
purposes, is a group of characters en- 
closed in quotes or entered at thè key- 
board in response to a string variable 
query. For instance, 

A$ = “You are a string.” 

and 

INPUT“What am I?”;A$ 

with 

You are a string. 

as thè response will both assign thè 
same value to A$. 

Business Basic provides for certain 
operations to be performed on strings 
to make our lives easier. Let’s look. 
These, along with examples, are 
listed in Table 1. 

Notice that all thè functions that 
result in a string of some sort end in 
in a $ while all those that yield a 
number don’t. 

Raising Arrays 

One last thing about strings, or 
rather, variables in generai. Some- 
times it is useful to have groups of 
them stored together in an orderly 
fashion called an array. Such an ar- 
ray could be represented by thè nota¬ 
tion F(0), F(l), F(2).F(n). In 

this example F is thè category name 
of all variables in thè array, much as 
“floor” might be thè name for all stops 
on an elevator. The numbers in pa- 
rentheses (called subscripts) desig¬ 
nate individuai floors (elements of 
thè array) so you can select thè one 


Function 

Description 

Example(s) 

LEFT$(var$,n) 

To designate thè first n characters 
in thè string variable var$. 

A$ = “HELLO THERE” 
PRINT LEFT$(A$,5) 

HELLO 

RIGHT$(var$,n) 

To designate thè last n characters 
in thè string variable var$. 

A$ = “HELLO THERE” 
PRINT RIGHT$(A$,5) 
THERE 

MID$(var$,s,n) 

To designate thè number of char¬ 
acters specified by n, starting 
with character s (counting from 
left to right) of thè string variable 
var$. 

A$ = “HELLO THERE” 
PRINT MID$(A$,1,5) 

HELLO 

PRINT MID$(A$,8,3) 

HER 

INSTR(var$,seg$) 

To find where in var$ thè vari- 

PRINT INSTR(A$,“HER”) 

INSTR(var$,seg$,s) 

able segment seg$ is located. Use 
thè second form to teli Basic at 
what position to start looking. 

8 

SUB$(var$,s) =seg$ 

To take a variable like var$ and 

SUB$(A$,I) = “G’BYE” 

SUB$(var$,s,l) = seg$ 

replace a portion of it with a 
variable segment seg$ beginning 
at position s. Alternatively, to in¬ 
dicate how much of thè segment 
should be used by specifying a 
length, such as 1. 

PRINT A$ 

G’BYE THERE 

SUB$(A$,7) = “G’BYE” 

PRINT A$ 

HELLO G’BYE 

SUB$(A$,7,2) = “G’BYE” 
PRINT A$ 

HELLO G’ERE 

ASC(char$) 

To find thè ASCII value of an 
individuai character, char$ (each 
of thè keyboard characters has a 
numeric value ranging from 0 to 
255). Keep in mind that a charac¬ 
ter used directly must be enclosed 
in quotes. However, if it has been 
assigned to a string variable, just 
use thè variable name. 

PRINT ASC (“A”) 

65 

A$ = “B” 

PRINT ASC(A$) 

66 

CHR$(n) 

A compìement to ASC. Given a 
number, n, between 0 and 255, 
this function prints thè ASCII 
character it represents. Note that 
some of thè characters generated 
by CHR$ are control characters 
that not only do not print on thè 
screen, but can cause some very 
strange things to happen, such as 
turning off thè screen or displaying 
all thè control characters (but they 
don’t perform correctly). None of 
these characters, however, will do 
in your III, so feel free to play 
with them a little. 

PRINT CHR$(67) 

C 

LEN(var$) 

To determine thè number of 
characters in variable var$. 

A$ = “HELLO THERE” 
PRINT LEN(A$) 

11 

SWAP varl$,var2$ 

To exchange thè values in thè A$ = “MADAM” 

two variables varl$ and var2$. B$ = “ADAM” 

Warning: Make sure both vari- PRINT A$;“ TM ”;B$ 

ables already exist in thè prò- MADAM I’M ADAM 

gram, even if one is a blank SWAP A$,B$ 

string. If you surprise thè PRINT A$;“ I’M ”;B$ 

machine with a variable it has ADAM I’M MADAM 

never heard of before, it’ll surprise 
you back. 

Table 1. Business Basic string operations. 
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Available from your locai dealer or cali: 

1 - 800 - 343-1218 

(in MA, cali 617-937-0200) 

ItftViriata SOFTWARE 
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Shuttle Intercept Catalog No. 19009, 
Apple II Disk, $34.95 


Laser Bounce Catalog No. 19209. 
Apple II Disk, $34.95 


Final Conflict Catalog No. 13609, 
Apple II Disk. $34.95 


Shuttle Intercept: Look what you’re up against: 
enemy satellites, missiles, flying saucers—even a 
hail of stupid meteors! Are you fast enough, cool 
enough, sure-handed enough to bring home your 
own satellites? 


Laser Bounce: Between you and your enemy’s 
deadly energy modules theres a high wall—so 
high, thè only way you can attack is by bouncing 
your laser beams off a swift satellite! But beware: 
thè enemy shoots back. Youll need a quick 
mind and a cool hand to survive thè battle of 
thè beams. 


Final Conflict: You choose thè battleground; 
you decide whether this will be a Sharp tactical 
war or a nerve-ravettir\g strategie confronta- 
tion. And when thè enemy marches out to 
meet you, your fate will be in your hands: 
survival — or annihilation! 


Three more of thè best ways to spend an 
evening, from Hayden Software: arcade- 
stylegamesyoull nevergettiredof. 
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you want. 

You can have a string array: 
var$(n); an integer array: var%(n); 
or a reai array: var(n). You must let 
thè III know in advance how many 
elements there will be in thè array so 
it can reserve enough Storage space. 
To do that use thè DIM statement: 

10 DIM var$(n) 

It sets up an array of string vari- 
ables, clearing room for n of them, 
plus one more since thè zero element 
of thè array is also initialized. The ar¬ 
ray is empty, meaning there is no 
data in it, only reserved spaces for thè 
data to come later. 

Suppose you wanted to keep track 
of your friends according to how 
dose you are to them. The follow- 
ing program would create an appro¬ 
priate array. 

10 DIM FRIENDS$(5) 

20 FRIENDS$(1) = “LOU” 

30 FRIENDS$(2) = “DIONNE” 

40 FRIENDS$(3) = “TED” 

50 FRIENDS$(4) = “DON” 

60 FRIENDS$(5) = “RICH” 

Now, in response to thè proper 
Print command, your III will list all 
these people in thè order their names 
are stored. 

70 FOR X = 1 TO 5 
80 PRINT FRIENDS$(X) 

90 NEXT X 

LOU 

DIONNE 

TED 

DON 

RICH 

If your program said: 

100 GET A$ 

110 IF VAL(A$) = 0 THEN 100 
115 IF VAL(A$)>5 OR VAL(A$)<0 THEN 100 
120 PRINT FRIENDS$(val(A$)) 

130 GOTO 100 

you’d get to pick which of your 
friends you wanted to see. 

You probably noticed thè Basic 
statements VAL, For. . .Next and 
DIM in thè last listing. VAL(var$) re- 
turns thè numeric value of thè vari- 
able in parentheses. This is not to be 
confused with ASC(char$), which 
yields thè ASCII value of a character. 
VAL tells us what thè variable is 
worth in terms of reai value. If that 


makes you think it will only work 
with numbers, you’re nine-tenths 
right. VAL(var$), where var$ is a 
string variable assigned thè value of 
any number (like A$ = “1234”), will 
return that number. If var$ is an 
alphabetic character, then it will 
return zero (a practical, everyday use 
of an If. . .Then statement). That’s 
thè way you can use a GET state¬ 
ment, which normally only accepts 
values as strings, to give you a num¬ 
ber to use later on. 

FOR vai = start TO end. . . NEXT 
is a counting facility that allows you 
to perform a function until thè value 
of vai equals thè value of end. Start is 
usually set equal to 1, but there s no 
law that says to do it that way. There 
is another command called Step, as- 
sociated with For. . .Next. If you 
don’t want to increment vai by 1 each 
time you count, use STEP n to teli 
Basic how much it should increase 
each time. For example, FOR X= 1 
TO 10 STEP 2 would count 1,3,5,7,9; 
FOR X= 10 TO 1 STEP - 1 would 
yield 10,9,8,7, and so on. If you’re 
counting backwards, you must use a 
negative step. 


“Suppose you wanted 
to keep track of your 
friends according to how 
dose you are to them.’’ 


Back in thè elevator, you inquire 
where inCider magazine holds forth 
and are told it’s on thè third floor, sec- 
ond office. Now there are two specifi- 
cations to thè location. Whereas thè 
floors of thè building comprise a one- 
dimensional array, thè floors and 
offices comprise a two-dimensional 
matrix (plural matrices). The matrix 
(location) could be represented by 
L(0,0). . . ,L(n,m). Just as with an ar¬ 
ray, you would have to define thè 
limits of thè matrix beforehand: DIM 
LOCATION (top floor, last office). 
Just make sure that thè two values are 
actually thè most they could be; if you 
later try to use a larger value than you 
have defined, you’ll get a ?SUB- 
SCRIPT OUT OF RANCE message. 


So much for thè variables right 
now. We’ll pick them up again next 
month when I write an actual, 
down-to-earth, practical Business 
Basic program. 

Micro-Sd Disk Drives 

Everyone knows you can’t have 
more than four floppy disk drives on 
thè III. But what if you could have 
13? You’d have to hire an octopus to 
handle all thè disks—unless, of 
course, you had thè Storage space 
with a lot fewer pieces of hardware. 

Well, there’s a company called Mi¬ 
cro-Sci (2158 South Hathaway St., 
Santa Ana, CA 92705) that’s market¬ 
ing three different drives for thè Ap¬ 
ple III. The A3 is a direct plug-in 
replacement for regular Disk III 
drives, but costs only $399; thè A73 
sports 70 tracks, twice thè normal 
Storage space, for $649; and thè 
A143 with 140 tracks (four Disk IIIs 
rolled into one) and holding 572K 
RAM sells for $799. It’s an incredible 
feeling to cali up a catalog of a blank 
disk and see 1113 blocks free. Little 
analog to digitai pulses course all up 
and down my spine. 

Yes, thè A73 uses double-density 
disks, and they’re more expensive 
than regular Disk III disks—about 
20 % more—but they are certified to 
work with data packed on a lot 
tighter. 

And yes, thè A143 uses double- 
sided, double-density disks and 
they’re even more expensive than 
plain double-sided (again about 20 % 
more), but these are certified to hold 
data on thè hubs!—no, only kidding. 

Also, you’re paying about $3 each 
for your present disks. If you use an 
A143, and pay $6 each, you’restoring 
four times thè data, getting $12 
worth of Storage space—a savings of 
$6. And you’ll have all your word 
processing or Visi Cale or PFS files on 
one disk. 

The manual that comes with thè 
A73/A143 is, barring a few linguistic 
stumbles, one of thè best I’ve ever 
seen. It’s aimed at thè person adding 
thè Micro-Sci as a second drive, but if 
you’ve already added a drive and this 
will be third, adapting thè instruc- 
tions is not difficult. 
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E-ZTaxpreparesthefollowing IRSforms 
and schedules: 

1040A 2106 

1040 EZ 2119 

1040 page 1 & 2 2210 

Schedule A 2440 

Schedule B 2441 

Schedule C 3468 

Schedule D 3903 

Schedule E 4137 

Schedule F 4684 

Schedule G 4972 

Schedule R/RP 5695 

Schedule W 6251 

1040 ES 6252 

1040 SE 


You Just Found It! 

E-Z Tax. The simplest tax preparation 
software ever developed was designed 
for your Apple II personal computer. 

Now you can prepare your own tax 
return without any knowledge of taxes 
or computer programming. From thè 
moment you inserì thè E-Z Tax floppy 
disk, you’ll be in full control. Every ques- 
tion is self-prompting and nothing is 
overlooked. 

If you make a mistake, thè program 
lets you know about it immediately. If 
you need tax help, just press a button 
and you’ll get thè answer. Its simply 
thè most amazing tax preparation soft¬ 
ware ever. 

• mmmmmmmmm COUPON 

P'ea se send me thè following n of kits requested 

_APPLE II _ IBM PC | 

_ ATARI 400 & 800 _CP/M 

_TOTAL REQUESTED 

x $69.95 each 

_ Total 

— Plus Postage & Handling ($4/kit) I 

_ Plus C O.D Charges ($3/kit) I 

_TOTAL ORDER 

(Enclose payment for this amount.) ■ 

ACT NOW! 

Send Check : Money Order : C.O.D J 
Charge my credit card □ Visa □ MasterCard ! 


Prints on Federai Forms 

When you’re finished, E-Z Tax will 
print out your tax return on officiai fed¬ 
erai forms. If you don’t have a printer, 
just fili in thè forms from thè data on thè 
screen. 

If you need help, you can cali E-Z 
Tax’s toll free customer Service phone 
number. 


ACT NOW! 

You just found thè tax preparation program 
you’ve been looking for. Now here’s how you 
can get your hands on it... 

• Fili in thè coupon, or 

• Cali toll-free to order over thè phone. 
Just give thè operator your credit card 
number or request a C.O.D. shipment. 

On/y $6995 

TAX DEDUCTIBLE 


Your E-Z Tax Kit Includes... 

• E-Z Tax Software Program (2 Disks) 

• E-Z Tax Guide Book 

• Over 35 Officiai Federai Tax Forms 
for 1982 Tax Returns 

• Tax Organizer Envelopes w m 

• Instruction Guide 

• Warranty Card 


Card #_ 

Signature 

Name_ 

Address_ 
City_ 


BOX 7676 

SAN JOSE, CA 951 50 
(408) 998-1040 

WATS LINE: (800) 331-1040 - USA 
(800) 344-1 040 - CA 


State 


Mail this coupon to TAX HELP. INC. INC183 
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Micro-Sci provides format drivers 
to replace those already on thè 
Utilities disk. All you have to do is edit 
thè parameters with thè System Con- 
figuration program. They also give 
you device drivers (.D2 and thè like) 
so you can access thè darn thing after 
you format it. There’s even a driver 
that will let you read thè standard 35 
track disks from thè A73 or A143. 

As far as appearance is concerned, 
and weight as well, there’s little re- 
semblance between thè Micro-Sci 
drives and thè Disk IIIs. The A143 is 
heftier and looks more like thè Disk 
II, except that thè drive door is a 
push-down affair with a lock. Re- 
moving a disk is as simple as pushing 
a button. The door opens and thè 
disk comes out under its own power. 
The A3 direct replacement has thè 
same lift-up door as thè Disk III. 
They all come in an Apple-compat- 
ible Sahara color with black fronts. 


Wordstar, CP/M 
And thè III 

If you Ve gotten a CP/M card for 
your Apple III and don’t want to wait 
until MicroPro comes out with Word- 
Star for it, you can use thè version 
now sold for thè II. The disks are read- 
able and Basic programs, saved with 
thè ,A option, can be downloaded. 

When you instali WSU, take thè 
default settings for terminal (on mine 
a Videx card with software upper/ 
lower case), select your printer type (I 
chose any teletype-like printer that 
can backspace) and driver type (I se- 
lected CP/M list device). When asked 
if thè installation is complete, say 
“No” and do thè following patches: 

CLEAD1: 01 

CLEAD1 + 1: 1A 

CB4LFG: 01 (or anything non-zero) 

LINOFF: 00 

COLOFF: 00 


ERAEOL: IF 

IVON : 01 

IVON + 1: 12 

IVOFF: 01 

IVOFF+1: 11 

The third patch, CB4LFG: 01 
assures that Wordstar sends cursor 
information column first, then line. 
IVON: and IVOFF: are highlighting 
commands meaning “inverse on” and 
“inverse off.” You get to thè + 1 spots 
by typing Return when asked for thè 
next address, just after you Ve done 
thè first. 

Happy Trials to You 

With only 850 bytes left in 
memory I’ve got to end. Next month 
PII write a Basic program, check out 
a non-Apple clock for thè III and, 
hopefully, compare a few word pro¬ 
cessing programs. Meanwhile, have 
fun trying out thè things you learned 
this month. 

Ciao Bene, Apple America! ■ 
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AUTHORS! 

AUTHORS! 

No motter how occurote or well designed your 
software Is ... it ìs judged by how it looks. 

Introducing Programmer's Power Tools II and ///. 

Take advantage of machine-lanquage speed in 
your Applesoft® programs. Expand your BASIC®. 
Commands like: 

■ Sgrt o strino array ■ Seorch a strina array ■ £yt 
garbage collection rime by 90%. ■format numeric 
output ■ Pack numbers ■ Read anything from a disk 

■ Utilize a machine language input routine which will 
help you "rivai thè masters." 

For thè Apple ///? Get PPT ///, it does for your 
Business BA$IC® what PPT II does for Applesoft®. Like: 
Sort, Search, Format, Convert and more. 

PPT II and /// offer your programs speed and power. 
More rhan ever before. Available for just $59.95 for 
PPT II and $79.95 for PPT ///, at your computer store or 
order direa from: 


VISA MasterCard. 



CE SOFTWARE / 801-73rd / 
Des Moines, IA / 50315 
tm (515)224-1992 


Dotti PPT II and PPT /// are sold on unprotected disketres and con be 
included in your own programs. (Programs using PPT rhaf ore to be 
sold nafionwide moy require registraiion ond poymenf of o roken 
licensing fee.) 


llilillllliSSlll 

I l : : " " 
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.nuli A functional, comfortable 

W* ■ APPLE II COMPUTER STATION 



THE PROBLEM: 

AN ACHING BACK RESTING 0N A TIRED REDUCES 
V0UR PRODUCTIVITY, CREATIVITY AND ENJ0YMENT. 

THE SOLUTION: 

™i%oniFOT n 

DESIGNED BY A DEDICATED 
COMPUTER H0BBYIST, IT 
P0SITI0NS THE KEYB0ARD AT A 
HEIGHT THAT REDUCES FATIGUE 
AND ACHES 0F THE LOWER BACK 
ANDSH0ULDERS. WITH DISK DRIVES 
AND CRT IN PLACE THERE ARE AB0UT 
TW0 SQUARE FEET (15" X 25") 0F 
WORK AREA DIRECTLY IN FRONT 0F 
YOU FOR READ'N AND WRIT'N. 
C0NSTRUCTED 0F ALL W00D FURNITURE 
QUALITY PARTICLE BOARD AND FINISHED IN 
W00DGRAIN (WALNUT OR 0AK) HIGH PRESSURE 
MICA LAMINATE, BASIC COMFORT II IS RUGGED (70 LBS.) T0 ORDER 
OR INQUIRE PH0NE 1-800-874-3514 
IN FLORIDA CALL C0LLECT (904) 252-7970 _ 

$169.00 PI US SHIPPiM.;. fu.RES Af)P ■ LiMtiiltiat’iii I 

FUI I v ASSEMBl LO 


PICTURE HOUSE 


BASIC COMFORT II COMPUTING PRODUCTS 


166 BOYNTON BLVD., DAYTONA BEACH, FL 32018 

APPLE II APPLE ARE REO IHADEMARK UE APPLE UOMPUIEh uUMPANY 
COPYRIGH! 1981 PlUURE HOUSE All RIGHI S RESI • VED 










. all from Jade 


LETTER QUALITY PRINTER - Comrex 

Uses standard daisy wheels and ribbon cartridges. 17CPS 
(200 words per minute) bi-directional prmtmg, semi- 
automatic paper loader (single sheet or fan fold). 10/12 15 
pitch, up to 16" paper. built-m noise suppression cover. 

PRD-11001 Centronics parallel . $899.95 

PRD-11002 RS-232C serial model . $969.95 

PRA-11000 Tractor Option . $169.95 


* 3 ) 

S/ 




TP-1 LETTER QUALITY - SCM 

12 CPS daisy wheel printer from Smith Corona. 

PRD-45101 Centronics parallel . $648.95 

PRD-45102 RS-232C serial . . mMÈLA $648.95 


OKIDATA - We Can Beat Any Price !!! 

Inexpensive. highly rehable. industriai quality prmters 
PRM-43082 Microline 82A 120 CPS 132 column CALL 
PRM-43083 Microline 83A 120 CPS 233'column CALL 

PRM-43084 Microlme 84 200 CPS parallel . CALL 

PRM-43085 Microlme 84 200 CPS serial w 2K . CALL 

Printer Interface Card & Cable for Apple II 

Card & cable to interface any parallel printer to your Apple 

PRA-28081 Interface card . $39.95 

PRA-27081 Interface card . $39.95 

PRA-27082 Cable .. ~,, $19.95 


EPSON - The world's best selling printers 
are available in one of Jade's Retail Stores. 

Dallas, Woodland Hills, 
Santa Ana, San Diego, 
Sunnyvale, Los Angeles 


APPLE DISK DRIVE - Fourth Dimension 

Totally Apple compatible. 143.360 bytes per drive on DOS 
3.3. half-track capability - reads all Apple software, plugs 
right in to Apple controller as second drive. DOS3.3. 3.2.1. 
Pascal. & CP M compatible. 

MSM-123200 Add-on Apple Drive .$279.95 

MSM-123100 Controller w DOS 3.3 . $99.95 


16K RAM CARD - for Apple II 

Expand your Apple II to 64K. use as language card, full 1 
year warranty. Why spend $175.00 ? 

MEX-16700A Save over $100.00 . $59.95 


Place Orders Toll Free 


Continental U.S. 

800-421-5500 


Inside Calilornia 

800-262-1710 


For Technical Inquires or Cuslomer Service cali: 

213-973-7707 


Computer Products 

4901 W. Rosecrans, Hawthorne. CA 90250 

We accept cash, checks, credit cards, or Purchase Orders 
from qualified firms & mstitutions Minimum prepaid order $15 
California residents add 6V 2 % tax. Export customers outsidethe 
US or Canada please add 10% to all prices Price* and avalllbility 
subject to change without notice. Shipping & handling charges 
via UPS Ground 50C/lb. UPS Air $1 00/lb minimumcharge$3.00 


5” Single-Sided, Double-Density, Box of Ten 

High quality diskettes with remforced center hub 
MMD-5110103 Box of ten diskettes . $19.95 

Z-80 CPU CARD - for Apple II 

Two computers in one. Z-80 & 6502. more than doubles thè 
power and potential of your Apple, includes Z-80 CPU 
card CP/M and complete manual set. 

CPX-62800A A & T with software . $249.95 


12" HI-RES GREEN SCREEN - BMC 

18MHz high-resolution green phosphor 
VDM-421200 12" Green phosphor . $99.95 


HI-RES GREEN SCREEN - NEC 

Up to 20 MHz bandwidth. P31 phosphor ultra-high 
resolution video monitor with audio 

VDM-650902 9 Hi-res green . $189.95 

VDM-651200 12" Hi-res green . $199.95 

VDC-651212 12" Composite color . $389.95 


HI-RES 12" GREEN - Zenith 

15 MHz bandwith 700 lines/inch. P31 green phosphor. 
switchable 40 or 80 columns. small. Iight-weight <& 
portable. 

VDM-201201 List price $189.95 . $129.95 


13" COLOR MONITORS - BMC 

18 MHz RGB & composite video color monitors. 

VDC-421320 13" RGB Color . $369.95 

VDC-421310 13" Composite video . $329.95 

VDX-420090 RGB card for Apple .$149.95 

Prices may be slightly higherat our retail locations. 


All for Apple 
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New Software 

edited by Linda Stephenson 


Printer Programs for 
Apple 

Print + Apple is a collec- 
tion of printer programs 
for your Apple II Plus com¬ 
puter and Epson MX-80, 
MX-80FT or MX-100 
printer with Graftrax-Plus 
and one disk drive. 

With Print + Apple you 
can print your own station- 
ery, address envelopes and 
print a variety of labels and 
other forms. 

Print + Apple lets you 
control thè darkness of let- 
ters and print in italic. The 
package comes with a 20- 
page manual that describes 
how to operate each pro¬ 
gram on thè disk. Print + 
Apple is menu-driven, so 
no knowledge of program- 
ming is necessary. It sells 
for $24.95 and is available 
from MicroWest, 868 
North Secqjid Street, Suite 
100, E1 Cajon, CA 92021. 
Reader Service number 
425. 


Plato Courseware 
Classroom 

Control Data Corp. (PO 
Box 261127, San Diego, 
CA 92126) is offering nine 


educational courses for use 
on thè Apple II Plus, Atari 
800 and Texas Instruments 
99/4A microcomputers. 

The courses, known as 
Plato courseware, feature 
an interactive method of 
self-paced, one-to-one in- 
struction. 

The nine courses being 
offered are Basic Number 
Facts, Whole Numbers, 
Decimals, Fractions, Phys- 
ics: Elementary Mechan- 
ics, French Vocabulary 
Builder, German Vocabu¬ 
lary Builder, Spanish Vo¬ 
cabulary Builder and 
Computer Literacy: Intro- 
duction. Some lessons cov¬ 
er elementary skills; others 
focus on junior high or 
senior high school skills. 

Initially, thè software 
will be sold through thè 
mail for $45 for a single 
lesson and $35 for addi- 
tional lessons. Reader Ser¬ 
vice number 427. 


The Report Card 

Sensible Software, 6619 
Perham Drive, W. Bloom- 
field, MI 48033, has en- 
tered thè education soft¬ 
ware marketplace with 


thè release of The Re¬ 
port Card. 

The Report Card tracks 
thè progress of up to 300 
students. The program cal- 
culates student and class 
averages, and ranks stu¬ 
dents within a class. 

The Report Card’s man¬ 
ual includes a reference 
section and tutorial. The 
program sells for $60. 
Reader Service number 
422. 


CP/M Converter 

Intercept, from Pro Mi¬ 
croSystems (16609 Sage- 
wood Lane, Poway, CA 
92064), is an on-line System 
utility which intercepts 
and processes CP/M-in- 
compatible System calls 
originating from user pro¬ 
grams running under 
CP/M 2.2. 

Intercept inserts a Cali 
Handler and a Cali Proces¬ 
sor below thè CP/M Basic 
Disk Operating System 
(BDOS) and then loads 
and executes thè user pro¬ 
grams. The Cali Handler 
intercepts all System calls 
and routes them to thè 
Cali Processor for conver- 
sion to CP/M 2.2-compati- 
ble form. 

Standard features of In- 
tercept include user-acces- 
sible software switch, al- 
lowing thè programmer to 
route System calls either to 
thè Cali Processor or di- 
recdy to thè BDOS; auto- 
matic Storage to thè DMA 
(disk I/O buffer) address in 
page zero memory; and 
preservation of user pro¬ 
gram stack and all pro¬ 
gram registers except those 
returning values or codes to 
thè calling program. 

Intercept is available in 
two versions. Version I 
features thè Cali Handler, 
Cali Processor and pro¬ 


gram loader in a single 
.COM file. Version II is de- 
signed for user customi- 
zation and comes with 
thè Cali Handler and pro¬ 
gram loader in a .COM 
file which automatically 
loads a separate Cali Pro¬ 
cessor file. 

All routines are written 
in Z-80 assembly language 
and come on standard 
eight-inch SSSD disk. In- 
tercept automatically ad- 
justs to any size CP/M en- 
vironment from 20K to 
64K. Intercept is priced 
at $89.95. Reader Service 
number 416. 


Speedy Statistical Analysis 

SoftCorp International 
Ine. is introducing Speed- 
STAT, a statistical anal¬ 
ysis System for Apple II 
computers. 

SpeedSTAT Volume 1: 
Frequericies and Crosstabs 
has a capacity of over 
10,000 data points and 
over 30 different statistical 
measures. 

SpeedSTAT is designed 
for small business and pro¬ 
fessional users. It allows 
easy statistical analyses of 
demographics studies, 
product testing and market 
research data. 

SpeedSTAT Volume 1 
sells for $250 and is avail¬ 
able from SoftCorp Inter¬ 
national Ine., 229 Huber 
Village Blvd., Westerville, 
OH 43081. Reader Service 
number 421. 


Investment Database 

Dial/Data, from Remote 
Computing Corporation 
(1044 Northern Blvd., 
Roslyn, NY11576), lets you 
have access to thè most 
comprehensive and sophis- 
ticated database available 
in thè investment industry. 
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With Dial/Data, users 
can access thè Merlin data¬ 
base of daily and historical 
prices for securities, com¬ 
modi ties and options. 

Dial/Data provides both 
large and small investors 
with thè information nec- 
essary to analyze trends. 
Dial/Data features statisti- 
cal modeling, portfolio 
management and thè abil- 
ity to create charts of 
stocks, bonds, commodi- 
ties, options and mutuai 
funds from every major 
exchange. 

Dial/Data is priced at a 
minimum of $45 a month. 
Reader Service number 
417. 


Medicai Office 
Management 

COMMA (Comprehen- 
sive Medicai Management 
for thè Apple) is a medicai 
management System for 
thè practices of up to nine 
doctors. Features include 


total accounts receivable 
control with variable peri- 
od aging reports, delin- 
quency notices, daily cash 
reports, statements, jour- 
nal and day sheet. 

Patient accounts can be 
entered as families or indi- 
viduals and can be dis- 
played at any time to re- 
view current balance and 
correct aging balances. 

Practice management 
features include daily and 
period-to-date reporting of 
Services performed by doc- 
tor, and practice and peri- 
od-to-date diagnosis analy- 
sis. COMMA also features 
a recali appointment 
scheduler with recali re- 
port, mailing notices and 
labels. 

The minimum hard¬ 
ware requirements are an 
Apple II Plus with 48K, 
24 x 80 Video Card, three 
floppy disk drives and 
80-column printer. The 
COMMA System costs 
$1495. Spectra/Soft Ine., 


PO Box 277, Chandler, AZ 
85224. Reader Service 
number 423. 


Futuristic Finance 

Empire II: Interstellar 
Sharks is a Science fiction 
game that places you in a 
future civilization at thè 
height of its material pros- 
perity and monopolista 
bureaucracy. 

Interstellar Sharks is thè 
second game in thè Empire 
Gaming Trilogy. The Tril- 
ogy will be completed with 
Empire III: Armageddon. 

In Interstellar Sharks, 
you must maneuver 
through webs of red tape 
and survive thè dealings of 
big monopolies. The objec- 
tive is not wealth itself, but 
thè rewards of wealth—thè 
freedom to acquire and 
outfit your personal space- 
craft, which will carry you 


to some ultimate destina- 
tion. Interstellar Sharks 
costs $32.95 and is avail- 
able from Interactive Fan- 
tasies, A Division of Edu- 
ware Services Ine., PO Box 
22222, Agoura, CA 91301. 
Reader Service number 
426. 


DB Master Statistics 
Analysis 

Stoneware Ine. has an- 
nounced DB Master Stat 
Pak. The Stat Pak provides 
thè ability to perform sta- 
tistical analysis on data 
contained in DB Master 
files. 

The program performs 
tests on selected records in 
a file, including Mean, 
Standard Deviation and 
Standard Error, Coeffi- 
cient of Variation, Fre- 
quency of Distribution, 
Unpaired t-test, Mann 



COMMA, from Spectra/Soft, handles a mid-sized medicai practice. 
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ACTION COMPUTERS 

“The Hardware Company” 

Data produets 2410 printer 245 LPM as is $1,000 or best offer 
New—Centronics 501 printer, 165 CPS, 132 Col... $750.00 
New Centronics 306 C, 165 Cps., 80 col. or 132 col. condensed 
print $750.00 

Refurburished Centronics 306 165 Cps., 80 col. like new 
1450.00. . . 

Refurburished Centronics 101 165 Cps, 132 col., like new 
$300.00 

Refurburished Centronics 102 AL, 330 Cps., 132 Col,... 
$1,050.00 

UPGRADE CENTRONICS PRINTERS 
ADD LOWER CASE TO 
MOST CENTRONICS PRINTERS 

No soldering $89.00. Add motor control to Centronics 

779 and TRS-80 Model I printers. . . $95.00 

Print in quiet—306 Quietizer Cover Cases, Used $79.00 New 

$125.00 

Printer Stands, 306’s and 501’s, 300 and 500 and 100 series. . . . 
$45.00 

Inforex 9” CRT with power source, keyboard, and 9” monitor, as 
is $35.00 each. 

BOARD AND PARTS AVAILABLE 
FOR MOST CENTRONICS PRINTERS. 
INTERFACES, MODEMS, MULTIPLEXERS 

Mix and Match, serial and parallel, mainframes, printers and/or 
CRTs. 

HEADS REBUILT (AL only) overnight Service... $95.00 
Computer Portrait Systems built to order. 

ACTION COMPUTERS Personal Computer users 

85 Factory Street CALL US NOW! 

Nashua, N.H. 03062 603 (883-5369) 


Singles' Night at Molly's, from Soft Images. 


Whitney U-test, Wilcoxen 
Paired Sample Test, Linear 
Regression, Correlation 
and One-way Analysis of 
Variation (ANOVA) with 
Newman-Keuls Test and 
Chi Square Test. 

DB Master Stat Pak sells 
for $99 and is available 
from Stoneware Ine., 50 
Belvedere St., San Rafael, 
CA 94901. Reader Service 
number 418. 


Solitaire 

Singles Night at Molly’s 
comprises two solitaire 
card games called Royal 
Flush and Sly Fox. The 
games feature various diffi- 
culty levels and require a 
considerable amount of 


strategy and skill. 

Royal Flush is played 
with a deck of 52 cards, a 
control deck and a five-by- 
five board matrix. The ob- 
ject is to place 25 randomly 
dealt cards onto thè matrix 
in such a way as to achieve 
thè highest possible score. 

Sly Fox is played with 
104 cards consisting of two 
standard 52-card decks and 
a 28-slot playing board ma¬ 
trix. The object of thè 
game is to make four piles 
of cards containing 13 
cards in suit and rank order 
from thè King to thè Ace, 
and four piles of cards from 
Ace to King. 

Singles’ Night at Molly’s 
sells for $29.95 and is avail¬ 
able from Soft Images, 200 
Route 17, Mahwah, NJ 


07430. Reader Service 
number 420. 


Applesoft Sort Utility 

SXR Plus is a utility that 
produces a sorted cross ref- 
erence of Applesoft source 
programs. SXR Plus does 
its work in memory for 
speed and always includes 
variables in thè cross ref- 
erence as Applesoft will 
use them when thè pro¬ 
gram is run. 

The program can be tai- 
lored to thè user’s needs by 
including or excluding ref- 
erence line numbers, nu- 
meric constants and quot- 
ed literals (strings). 

The user can choose ei- 
ther a 40- or 80-column 


output format and direct 
thè output to standard vid¬ 
eo, 80-column video card 
or a printer. 

If you don’t have a 
printer, thè search feature 
will be useful. It gives all 
thè information as a full 
cross reference, limited on¬ 
ly to thè variable, refer- 
enced line number, numer- 
ic Constant or quoted literal 
that thè user specifies. 

Automatic pause, man- 
ual pause and early termi- 
nation features have been 
added for convenience. 

Hardware requirements 
for using SXR Plus are an 
Apple II with 48K, DOS 
3.3 and a version of Apple¬ 
soft (Apple II Plus, ROM 
card or disk Applesoft). A 
printer or an 80-column 
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Discovery Gatnes, jrom Apple Computer and thè Childrens Television 
Workshop (creators ofthe Muppets), bring education and enjoyment in- 
to thè ho me. 


video card is optional. 

SXR Plus costs $39.95 
and is available from 
Prasek Computer Systems 
Ine., PO Box 2427, Santa 
Clara, CA 95055. Reader 
Service number 415. 


Sesame Street 
Computerized 

Apple Computer Ine. 
has announced thè release 
of 16 educational games 
developed by thè creators 
of Sesame Street—The 
Children’s Television 
Workshop. 

The 16 games are con- 
tained in four packages: 

• Ernie’s Quiz, for ages 4 
to 7, includes Muppet and 
number guessing games, 
and a program that lets thè 
child create a face using 
game paddles to select a 
variety of eyes, noses and 
other facial features. 

• Instant Zoo, for ages 7 to 


10, is a set of games that 
helps thè child improve his 
reaction speed as he un- 
scrambles words, spots 
shooting stars, names ani- 
mais and matches pairs of 
words. 

• Spotlight, for ages 9 to 
13, includes games that 
present advanced ideas, 
such as thè way light will 
angle when reflected off a 
mirror. 

• Mix and Match, designed 
for all ages, allows thè fam- 
ily to play Discovery Games 
together. The package in¬ 
cludes easy games for 
younger children and more 
advanced programs for oth¬ 
er members of thè family. 

Each Discovery Games 
package is sold separately 
for $50. The Mix and 
Match package requires 
Applesoft; thè other pack¬ 
ages require Integer Basic. 

Apple Computer Ine., 
20525 Mariani Ave., Cu- 
pertino, CA 95014. Reader 
Service number 419. 


Circle 183 on Reader Service card. 



Automate your lab 
with ALIS 

lf you work with pH meters, timers, positioners, 
chromatographs, flow meters, BCD devices — in 
short, almost ANY device which accepts or gener- 
ates an analog or digitai signal — ALIS will turn your 
APPLE into a true REAL-TIME automation System. 

If you can program in BASIC, then ALIS’ Applesoft - 
callable interface software can have you talking to 
your world at once. 

Display your results immediately or analyze off-line 
with a hi-resolution graphing package which you can 
modify. ALIS is thoroughly documented with over 100 
pages of readable manuals. 

You can add an ALIS automation 
System in minutes! 

No machine language programming. No soldering. 
ALIS hardware is complete and preassembled — 
Apple interface, cabling, terminal box, test switches 
— as easy to add as a printer. 

Just connect thè “reai world” and GO !...at 
software-controlled rates up to 10,000 data points per 
secondi 

ALIS high-speed reai world interface systems are avail¬ 
able NOW for thè following configurations: 


Precision Analog Input: ALIS/A12. $ 1,517 

(16 channels, .024% Acc., lOOmV min. full scale) 

Analog Input: ALIS/AOB. $ 1,149 

(16 channels, .39% Acc., 5 Volts full scale, 5 kHz max.) 

Analog Output: ALIS/AO. $ 841 

(2 channels, .39% Acc., 10 Volts full scale) 

Digital Input/Output: ALIS/DIO. $1,600 


(32 bi-directional channels, quad timers, interruptsj 
ALIS systems require a 48K Apple, Applesoft, DOS 3.2 or 3.3 

For additional information, detailed specifications, 
and price schedule, contact: 

eco-tech, ine. 

2990 Lake Lansing Rd. • P. O. Box 776 * East Lansing, MI 48823 
(517) 337-9226 

ALIS is a trademark of Eco-Tech, Ine. 

APPLE and APPLESOFT are trademarks of Apple Computer, Ine. 
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ThePrintMate 150 features high-resolution graphics , ioide carrìage, paper 
versatility and optional SoftSwitch and buffer expansion. 


Quartet of New 
Wide-Carrìage Printers 

Micro Peripherals Ine. 
has announced thè release 
of four new wide-carriage 
versions of thè PrintMate 
150 printer. PrintMate 150 
models Al and A2 have 
standard 16K memory buf- 
fers; models Al and B1 
have 4K and 2K buffers, 
respectively, allowing fast 
throughput at 150 CPS. 

The PrintMate 150 mod¬ 
els Al and A2 include thè 
SoftSwitch front panel key¬ 
pad, which allows direct 
control of forms length, 
print density, horizontal 
and vertical tabs, baud 
rate and character set. A 
SoftSwitch entry enables 
direct keypad setting of thè 
PrintMate 150. A tune of 
confirmation or a repeat 
entry signal responds to ev- 
ery keypad entry. Soft¬ 
Switch also can be added to 
PrintMate B models. 

Prices for thè print¬ 
er start at $995. Contact 
Micro Peripherals Ine., 
4426 S. Century Drive, 
Salt Lake City, UT 84107. 
Reader Service number 
401. 


Logo Lessons 

A 100-page practical 
guide explaining Logo has 


been released by thè Young 
Peoples’ Logo Association. 
The Turtle’s Sourcebook is 
designed to meet thè needs 
of teachers and parents in 
presenting thè steps and 
concepts of Logo in a logi¬ 
cai sequence. 

Written by Donna Bear- 
den and James H. Muller 
of thè Young Peoples’ Logo 
Association and Dr. Kath- 
leen Martin of thè Univer¬ 
sity of Dallas, The Turtle’s 
Sourcebook addresses TI 
Logo, Apple Logo and 
MIT Logo for thè Apple. 
It’s available for $29.95 
from thè Young Peoples’ 
Logo Association, 1208 
Hillsdale Drive, Richard- 
son, TX 75081. Reader Ser¬ 
vice number 402. 


Single-Card Key 
To Z-80 Based Software 

The Appli-Card, a 
CP/M product developed 
for thè Apple II, is thè only 
single card that can execute 
Wordstar and use its full 
features. The Appli-Card 
includes 64K of on-card 
memory for application 
development and execu- 
tion. It comes standard 
with a 4-MHz Z-80A; a 
6-MHz Z-80B can be or- 
dered separately. The 
Z-80A or Z-80B CPUs can 
run at maximum speed. 


The Appli-Card is de¬ 
signed to support CP/M 
application with one card. 
The Appli-Card’s SoftVid- 
eo features include upper- 
and lowercase letters and 
40- to 255-column horizon¬ 
tal scrolling. 

The Appli-Card retails 
for $995 from Personal 
Computer Products Ine., 
16776 Bernardo Center 
Drive, Suite 203, San 
Diego, CA 92128. Reader 
Service number 407. 


Easy to Operate 
Modem II 

Multi-Tech Systems has 
released a new user-friend¬ 
ly modem for Apple II and 
Apple II Plus computers. 
The Modem II features 
menu-driven software 
with user prompts at all 
levels of command entry 
and keyboard dialing for 
easy operation. 

The Modem II doesn’t 
require thè use of a serial 
interface card; it plugs into 
one of thè I/O slots inside 
thè computer for full- or 
half-duplex Communica¬ 
tions at either 110 or 300 
bits per second. 

The Modem II comes 
with a software disk that 
contains various utility 
programs, including thè 
terminal program. It re¬ 
tails for $369 and is avail¬ 
able from Multi-Tech Sys¬ 
tems Ine., 82 Second Ave. 
S.E., New Brighton, MN 
55112. Reader Service 
number 408. 


TomorrowHouse for 
Toda/s Home 

TomorrowHouse is a 
computerized home moni¬ 
toring and control System 
from Compu-Home Sys¬ 
tems Ine., 3333 E. Florida 
Ave., Denver, CO 80210. 


The System can turn on 
lights to scare off burglars, 
and light escape routes in 
case of a fire. 

TomorrowHouse can 
schedule heating and air 
conditioning up to nine 
weeks in advance. Forty- 
eight changes a day may be 
made to maximize comfort 
and minimize energy use. 
You can even schedule 
your hot tub to be at a cer- 
tain temperature at a given 
time and date. 

In addition to security 
and energy-saving advan- 
tages, TomorrowHouse of- 
fers many convenience fea¬ 
tures, such as an appoint- 
ment calendar and voice 
wake-up alarm. 

TomorrowHouse can 
even talk. Warnings about 
problems and periodic an- 
nouncements are actually 
spoken. 

The TomorrowHouse 
System consists of a built-in 
Circuit card, sensors, a 
junction box and related 
hardware for easy hookup, 
programs necessary to set 
up and control any house, 
and an installation and 
user’s manual. Apple own- 
ers can purchase thè System 
for under $1000. Reader 
Service number 409. 


Apple II Allies 

The ALIS group of data 
acquisition and control 
modules for thè Apple II 
provides thè user with an 
economical multifunction 
laboratory or industriai in- 
strumentation System. 

Hardware and aug- 
mented Basic software 
modules permit eight-bit 
or 12-bit analog input and 
analog output and 32 bits 
of bidirectional binary I/O 
at rates up to 10 kHz un¬ 
der ALIS software. The 
ALIS/D digitai System pro- 
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1 SOURSSURGES 


theL 


Our crop-The Lemon™, The Lime™, 
and The Orange™ are designed to 
eliminate undetected submicrosecond 
overvoltage transients from electrical 
circuits. Commonly referred to as 
“spikes”, or “glitches”, these tran¬ 
sients can cause hardware and soft¬ 
ware damage to unprotected circuits. 

Today’s electronic products are often 
microprocessor controlled - mini and 
micro computers, televisions, video 
cassette recorders - to name a few. 
Each of these products is sensitive to 
fluctuations in electrical power lines. 
Power switching devices such as 
refrigerators coming on and off or air 
conditioners starting up can be respon¬ 
sive for a momentary surge or spike of 
electricity in a Circuit. Even your locai 


utility stepping-up transformers to add 
power at peak load times or an elec¬ 
trical storm passing through can trigger 
surges. Such surges can cause equip- 
ment to falter at times, not to work at 
peak performance or fail completely. 
An entire data base can be lost. 

Now you can prevent this from 
happening to you with an AC Surge 
Protector from Electronic Protection 
Devices. Each Protector is a solid state 
clamping device with 6 outlets utilizing 
modern high speed semiconductor 
technology. Using our Protectors is as 
simple as plugging it into any standard 
three wire duplex outlet then plugging 
what needs protection into it. Each 
Protector exceeds thè IEEE 587-1980 
Guide for Surge Voltages in Low 


Voltage AC Power Circuits. 

When you compare thè cost of 
computer hardware, software and your 
time with thè price of a Protector (from 
$59.95 to $139.95), you’ll want to sour 
your surges with one of thè AC Surge 
Protectors from EPD, which are 
available through your locai dealer. 


Electronic Protection Devices 

5 Central Avenue 

Waltham, Massachusetts 02154 

In Massachusetts Cali: 

(617) 891-6602 

Outside Massachusetts Cali: 
1-800-343-1913 

Dealer Inquiries Invited 


Circle 25 on Reader Service card 
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vides two 16-bit hardware 
clocks for timing and up to 
14 serviceable external in- 
terrupt conditions. 

Prices for thè ALIS Sys¬ 
tems (not including hard¬ 
ware, add-ons or expan- 
sion units) range from 
$1149 for thè ALIS A/8 to 
$3100 for thè ALIS, which 
includes analog input and 
digitai I/O. ALIS systems 
are available from Eco- 
Tech Ine., 2990 Lake Lan- 
sing Road, PO Box 776, 
East Lansing, MI 48823. 
Reader Service number 
410. 


Switching to thè Apple 

Designed for small busi¬ 
ness, professional or per¬ 
sonal Apple users, thè Cen- 
tronics-compatible Printer 
Switch from Intra Com¬ 
puter permits hard copy to 
be routed to a letter-qual- 
ity daisywheel or high- 
speed dot-matrix printer. 
Enclosed in a plastic case 
that matches existing Ap¬ 
ple hardware, thè Printer 
Switch can be installed by 
plugging in thè interface 
cable from a single parallel 
board within thè Apple to 
a connector on thè rear 
panel of thè Printer 
Switch. Each of thè two 
built-in, six-foot cables 


from thè switch are then 
attached to thè printer. 

The Printer Switch is 
available from Intra Com¬ 
puter, 101 West 31 St., 
New York, NY 10001 and 
sells for $150. Reader Ser¬ 
vice number 403. 


Apple II Mate 

The AppleMate disk 
drive is fully compatible 
with thè Apple II comput¬ 
er; it features thè same 
track formatting, Storage 
capacity, cabinetry and 
color as thè Apple II disk 
drive. Manufactured by 
Mitac Ine. and distributed 
by DFA Ltd. (1062 E. 105 
St., Brooklyn, NY 11236), 
thè AppleMate includes a 
read/write head and con¬ 
troller advanced enough 
that virtually all I/O errors 
are eliminated. 

The AppleMate requires 
514-inch single-sided flop¬ 
py disks, soft- or hardsec- 
tored, and has a Storage 
capacity of 143 KB (16- 
sector format). The price 
is $335. Reader Service 
number 404. 


Retailing Made Easy 

Advanced Business 
Technology Ine. has an- 
nounced a new point-of- 



The Printer Switch is an easily installed accessory that sends hard copy to a 
letter-quality daisywheel or high-speed dot-matrix printer. 


sale and inventory control 
System. The Retail Manag¬ 
er integrates thè Apple 
with ABT’s software, bar 
code reader and Cash 
Drawer program. 

The Retail Manager Sys¬ 
tem reads and prints bar- 
coded labels that can be at¬ 
tached to produets. This 
provides store owners with 
complete inventory track- 
ing. It also prints receipts, 
records transactions, moni- 
tors stock levels, provides 
organized daily reports and 
accumulates sales informa- 
tion in monthly and yearly 
files. 

The Retail Manager is 
available for less than 
$6000 (including an Apple 
computer) from Advanced 
Business Technology Ine., 
12333 Saratoga-Sunnyvale 
Road, Saratoga, CA 
95070. Reader Service 
number 405. 


Picture This. . . 

CommSoft’s new Photo- 
Caster, with thè help of an 
Apple II or Apple II Plus, 
allows thè user to send and 
receive eight-seeond photo- 
graphs over telephone 
lines. You can actually 
watch as photos enter your 
computer; later, you recali 
and process thè photos 
from disk and make black 
and white prints with a 


dot-matrix printer. 

The PhotoCaster has 
several other interesting 
capabilities: You can pro¬ 
duce and edit slide shows 
for later viewing, you can 
enhance and improve your 
photos by adding titles and 
graphics and you can pre¬ 
serve and duplicate your 
photos on paper. 

The System includes a 
factory-assembled and 
tested 1/ O Circuit board 
(containing modem and 
camera interface), a two- 
disk software package and 
a 150-page instruction 
manual. Options include a 
TV camera and a color 
filter accessory. It’s avail¬ 
able from CommSoft Ine., 
665 Maybell Ave., Palo 
Alto, CA 94306. Model 
PC-100 costs $499.95, plus 
$5 shipping; Model PC-101 
(which includes a TV cam¬ 
era, RGB filter accessory 
and cable) costs $795.95, 
plus $10 shipping. Reader 
Service number 406. 


Keep Criminals Out 

Your Apple computer 
can serve as an intelligent 
burglar alarm or fire alarm 
with thè IMI Hibernator 
from Innovative Measure- 
ments Ine., PO Box 3879, 
San Clemente, CA 92672. 
The self-contained ac line 
power switch boots up at a 



The IMI Hibernator comes with three ac line output sockets; tramient 
suppression is provided on these outputs. 
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HI-LIGHT YOUR GRAPHICS! 



CR£?A r/OASS 


AVANT-GARDE CREATIONS Circle 39 on Beader Service card. 

P.O. BOX 30160 • EUGENE, OR 97403 • (503) 345-3043 

BUSINESS, EDUCATION, UTILITY AND ENTERTAINMENT SOFTWARE 


Bring your Apple® graphics programs out of thè dark ages with thè help of Avant-Garde Creations’ 
enlightening HI-RES SECRETS programmerà utility series! These two information-packed 
Systems reveal everything you need to know about state-of-the-art Apple® hi-res graphics pro- 
gramming and more. Both are stand-alone packages, but together they make an unbeatable 
combination! 


NOW IN THE SPOTLIGHT: 

HI-RES SECRETS GRAPHICS APPLICATIONS SYSTEM (G.A.S.) is a complete 
utility that takes you step by step through thè answers to all of your specific Apple® 
graphics application questions including: how to turn fair BASIC programs into good 
BASIC programs, translate BASIC programs into machine language programs, how 
to make business graphics, architectural and electronic designs, 3-D designs, 
marketable quality arcade and adventure games and more. G.A.S. also contains 
an exciting new super-fast color-filling Palette program that has 140 gorgeous 
colors, 160 different patterns, 4 separate fili algorithms and thè program 
even allows you to fili on both black and white backgrounds! HI-RES 
SECRETS GRAPHICS APPLICATIONS SYSTEM includes 3 un- 
protected disks plus an extensive manual at a special introductory price 
of only $75.00. Available separately, HI-RES ARCHITEC- 
TURAL DESIGN and HI-RES ELECTRONIC DESIGN retail 
for $29.95 each. 


HAVE YOU SEEN THE LIGHT? 

HI-RES SECRETS is Avant-Garde Creations’ originai best- 
selling programmerà graphics utility. From block, vector and 
hplot shapes to animation, type font, music and color-fill 
programs, HI-RES SECRETS reveals all! From novice to 
expert, this indispensible graphics utility System is a must 
for every programmerà library. HI-RES SECRETS 
contains 4 disks with a 263-page manual and retails 
for $125.00. 


No permission or royalties are required for thè 
use of HI-RES SECRETS or G.A.S. routines 
in your own programs. All 3 Systems run on 
Apple II 48K DOS 3.3 and are available at 
your locai dealer or you may order direct 
from Avant-Garde Creations. 


Apple*' is a regiscered trademark of Apple Computer Ine. 
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The RAMDISK 320K Memory System for thè Apple Illjeatures a slot in- 
dependent interface board that draws no power from thè computerà 
power supply during operation. 


switch closure to thè Hi- 
bernator in transforming 
into a burglar alarm or fire 
alarm—or into an indus¬ 
triai data logging System. 
Controlled by thè IMI 
RealClock (with Apple 
power turned off), thè Hi- 
bernator boots up at con¬ 
trolled times. This results 
in thè power being on for 
only a few minutes each 
day, preventing overheat- 
ing and conserving energy. 
The Hibernator sells for 
$95, plus $5 shipping. 
Reader Service number 
411. 


Computer docking 

The IMI RealClock, an 
advanced plug-in card for 
thè Apple II or Apple II 
Plus computer, provides 
thè data and time values 
for several purposes, from 
date-stamping database 
files to measuring elapsed 
time in running programs. 
Four modes of interrupt 
operation give thè user 
flexibility; thè interrupt 
periods can be set from one 
millisecond to one year in 
millisecond increments. 

Step-by-step documen- 
tation and an introduction 
to thè use of interrupts are 
provided for thè beginner. 
Full documentation of reg- 
isters, latches and user sub- 


routines is provided for thè 
experienced machine-lan- 
guage programmer. 

The IMI RealClock sells 
for $190, plus $5 shipping, 
from Innovative Measure- 
ments Ine., PO Box 3879, 
San Clemente, CA 92672. 
Reader Service number 
412. 


More Memory 

The RAMDISK 320K 
Memory System provides 
access speeds previously 
unavailable to Apple III 
users. While it’s thè same 
size as an Apple III disk 
drive, thè RAMDISK con- 
tains more than twice thè 


memory capacity of an Ap¬ 
ple drive. It includes 320 
kilobytes of random access 
memory and is designed to 
function like one 80-track 
or two 40-track floppy disk 
drives. 

The RAMDISK is made 
to interact with thè Apple 
SOS operating System. It 
includes software for diag- 
nostics, fast load and copy 
routines, and business ap- 
plications. All firmware is 
contained in static RAM on 
thè interface board. A re- 
chargeable battery System 
is included for three hours 
of backup. 

RAMDISK 320K Memo¬ 
ry System retails for $1395 


from Axlon Ine., 170 N. 
Wolfe Road, Sunnyvale, 
CA 94086. Reader Service 
number 413. 


Pamper Your Printer 

Orange Micro’s new 
printer buffer, thè Buffer- 
board, allows 64K of data 
to be stored and fed to thè 
printer at its own printing 
rate. The Bufferboard is 
designed exclusively for thè 
Apple II and Apple III 
computers. It comes stan¬ 
dard with 16K of memory; 
additional memory chips 
are available to increase 
buffering capacity to 32K 
or 64K. 

The Bufferboard fea- 
tures Orange Micro’s inter¬ 
face docking System. A new 
interface is not need- 
ed—thè Bufferboard fits 
into thè Apple and docks 
all popular parallel printer 
interfaces, including Grap- 
pler, Grappler Plus and 
Epson interfaces. It takes 
about 30 seconds to instali 
and operate thè Buffer¬ 
board, which Stores up to 
20 full pages (when ex- 
panded to 64K). 

The Bufferboard costs 
$175; contact Orange 
Micro Ine., PO Box 2076, 
Yorba Linda, CA 92686. 
Reader Service number 
414. 



The IMI RealClock, a clock/calendar plug-in card, comes with a dem- 
onstration disk that exhibits methods of reading and writing to thè 
RealClock. 



The Bufferboard, with up to 64K Storage, fits into your Apple II or III 
and docks all popular parallel printer interfaces. 
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TURBOCHARGE YOUR APPLE 


With The Quentin 500 Winchester Disk Drive 



Introductory 


Prices 


5 MB 

$1995 

10 MB 

$2195 

15 MB 

$2395 

20 MB 

$2595 


When you're ready to go thè distance, thè Quentin 500 
is thè high density, high speed Winchester subsystem that 
can fuel your Apple into a first-class powerhouse. 

It's Deep. Store and retrieve 5, 10, 15 even 20 
megabytes of formatted data on a single drive. With 20 
megabytes of juice, you've got thè equivalent of 140 
conventional floppy disks, 4800 full pages of text, or all 
thè financial files of a $50 million business. 

It's Fast. The Quentin 500 accelerates from 0 to Read 
in 70 MS. And thè DMA data transfer rate zips along at 5 
MBits per second. 

It's Accurate. The Quentin 500 moves out in front 
with thè remarkable new Disk Drive Self Test Diagnostic 
System. Flick a switch and thè 500 runs through its paces 
checking all Winchester operating functions, and verify- 
ing thè integrity of thè drive and thè data. While thè 
controller's full 32 bit Errar Correction Code overrides all 
data field errors. 

It's Reliable. Whether you're on-line all day, 
or driving in short, fast sprints, thè Quentin 500 is 
strictly high performance. MTBF 10,000 
power-on hours, with no preventive 
maintenance required. 

Every Quentin 500 is delivered com- 


(§u€min) 

^^RESEARCH.INC 


pTetely assembled, and is fully tested on Apple operating 
Systems. And thè Q-500 has a full one-year factory warranty. 

It's Compatible and Apple-Beige. Plug it into 
your favorite Apple, and shift into full power. Software 
support packages provided to ensure complete compati- 
bility with DOS, CP/M, Pascal and protected software. 

And It's Very Affordable. The Quentin 500 is 
thefirst premium quality Winchester subsystem offered at 
a price all businessmen, professional corporations and 
serious computer users can afford. 

Count On Quentin For Quality. Quentin Re¬ 
search has been designing and building mass Storage 
subsystems for corporate users for five years. That's quite 
a few times around thè track. 

We've put those five years to good use by developing 
state-of-the-art disk technology for business and personal 
use, and by building a reputation for reliable 
Products and stable management. 

The Hotline to our Product Support Manager is 
open every week day for information on our full 
product line. When you're ready to 
expand your computer's capabilities, 
turbocharge with thè Quentin 500. It's 
an information powerhouse. 


* Apple is a registered trademark of Apple Computer, Ine 


19355 Business Center Drive 
Northridge, CA 91324 
(213) 701-1006 • Telex 910-493-2174 


To Order Check, money order, Visa or MasterCard 
number. Calif. residents add 6% sales tax 
Authorized club discounts available. Cali or write 
for Quentin 500 Specifications and Features. 
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MORE THAN JUST AHOTTER PftETTY FACE. 


Says who? Says ANSI. 

Specificali^ subcommittee X3B8 of thè American 
National Standards Institute (ANSI) says so. The fact 
is all Elephant™ floppies meet or exceed thè specs 
required to meet or exceed all their standards. 

But just who is "subcommittee X3B8" to issue such 
pronouncements? 

They’re a group of people representing a large, 
well-balanced cross section of disciplines—from 
academia, government agencies, and thè computer 
industry. People from places like IBM, Hewlett-Packard, 
3M, Lawrence Livermore Labs, The U.S. Department 
of Defense, Honeywell and The Association of Com¬ 
puter Programmers and Analysts. In short, it’s a bunch 
of high-caliber nitpickers whose mission, it seems, in 
order to make better disks for consumers, is also to 


make life miserable for everyone in thè disk-making 
business. 

How? By gathering together periodically (often, 
one suspects, under thè full moon) to concoct more 
and more rules to increase thè quality of flexible 
disks. Their most recent rule book runs over 20 single- 
spaced pages—listing, and insisting upon—hundreds 
upon hundreds of standards a disk must meet in 
order to be blessed by ANSI. (And thereby be taken 
seriously by people who take disks seriously.) 

In fact, if you'd like a copy of this formidable docu- 
ment, for free, just let us know and we'll send you 
one. Because once you know what it takes to make 
an Elephant for ANSI... 

We think you'll want us to make some Elephants 
for you. 


ELEPHANT HEJWYDUTYDiSKS. 

For a free poster-size portrait of our powerful pachydemn, please write us. 
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